16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
|
;; You should have received a copy of the GNU General Public License
;; along with Megatest. If not, see <http://www.gnu.org/licenses/>.
;;======================================================================
(declare (unit runsmod))
(declare (unit mtmod))
(import
(prefix base64 base64:)
(prefix mtargs args:)
(prefix mtconfigf configf:)
(prefix sqlite3 sqlite3:)
call-with-environment-variables
commonmod
csv
dbmod
directory-utils
format
itemsmod
matchable
message-digest
md5
mtmod
pgdbmod
ports
posix
regex
rmtmod
servermod
srfi-1
srfi-1
srfi-13
srfi-18
srfi-18
srfi-69
srfi-69
stml2
subrunmod
tasksmod
testsmod
typed-records
z3
)
|
<
<
<
|
<
<
|
|
<
|
<
|
|
<
|
|
|
<
<
|
|
|
<
<
|
|
|
|
|
|
<
<
<
<
<
|
|
|
>
>
>
>
>
>
>
>
>
>
>
>
>
|
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
;; You should have received a copy of the GNU General Public License
;; along with Megatest. If not, see <http://www.gnu.org/licenses/>.
;;======================================================================
(declare (unit runsmod))
(declare (uses commonmod))
(declare (uses dbmod))
(declare (uses launchmod))
(declare (uses mtargs))
(declare (uses mtconfigf))
(declare (uses mtmod))
(declare (uses pgdbmod))
(declare (uses rmtmod))
(declare (uses servermod))
(declare (uses stml2))
(declare (uses subrunmod))
(declare (uses tasksmod))
(declare (uses testsmod))
(declare (uses itemsmod))
(module runsmod
*
(import scheme chicken data-structures extras ports files)
(use (prefix base64 base64:)
(prefix sqlite3 sqlite3:)
call-with-environment-variables
csv
directory-utils
format
matchable
message-digest
md5
ports
posix
regex
srfi-1
srfi-1
srfi-13
srfi-18
srfi-18
srfi-69
typed-records
z3)
(import commonmod)
(import dbmod)
(import itemsmod)
(import mtmod)
(import pgdbmod)
(import (prefix mtargs args:))
(import (prefix mtconfigf configf:))
(import rmtmod)
(import servermod)
(import stml2)
(import subrunmod)
(import tasksmod)
(import testsmod)
;; (use (prefix ulex ulex:))
(include "run_records.scm")
(include "db_records.scm")
(include "test_records.scm")
(include "key_records.scm")
|