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
|
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
|
+
-
-
+
+
+
-
+
+
-
+
-
-
+
+
+
+
+
+
-
-
+
+
+
+
+
+
+
|
;;======================================================================
;;======================================================================
;; All the crud that was in megatest.scm
;;======================================================================
(declare (unit mtbody))
(declare (uses debugprint))
(declare (uses mtargs))
(declare (uses apimod))
(declare (uses archivemod))
(declare (uses commonmod))
(declare (uses configfmod))
(declare (uses dbfile))
(declare (uses dbmod))
(declare (uses dbfile))
(declare (uses debugprint))
(declare (uses diff-report))
(declare (uses envmod))
(declare (uses apimod))
(declare (uses fsmod))
(declare (uses genexample))
(declare (uses rmtmod))
(declare (uses archivemod))
(declare (uses launchmod))
(declare (uses megatestmod))
(declare (uses mtargs))
(declare (uses mtmod))
(declare (uses mutils))
(declare (uses odsmod))
(declare (uses portlogger))
(declare (uses processmod))
(declare (uses testsmod))
(declare (uses diff-report))
(declare (uses rmtmod))
(declare (uses runsmod))
(declare (uses servermod))
(declare (uses stml2))
(declare (uses tasksmod))
(declare (uses tcp-transportmod))
(declare (uses tdb))
(declare (uses testsmod))
(use srfi-69)
(import csi)
(module mtbody
*
|