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
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
|
;; Added for csv stuff - will be removed
;;
(use sparse-vectors)
(declare (uses mtargs))
(declare (uses mtconfigf))
(import (prefix mtargs args:))
(import (prefix mtconfigf configf:))
;; order maters
(declare (uses commonmod))
(declare (uses apimod))
(declare (uses cookie))
(declare (uses keysmod))
(declare (uses dbmod))
(declare (uses ducttape-lib))
(declare (uses megamod))
(declare (uses mutils))
(declare (uses pgdbmod))
(declare (uses pkts))
(declare (uses rmtmod))
(declare (uses runsmod))
(declare (uses stml2))
(declare (uses tasksmod))
(declare (uses testsmod))
(declare (uses ulex))
(import commonmod)
(import keysmod)
(import dbmod)
(import apimod)
(import cookie)
(import ducttape-lib)
(import megamod)
(import mutils)
(import pgdbmod)
(import pkts)
(import rmtmod)
(import runsmod)
(import stml2)
(import testsmod)
(import ulex)
;; NOTE: Order is important!
;; invoke the imports
(declare (uses mtargs.import))
(declare (uses mtconfigf.import))
;; invoke the imports
(declare (uses commonmod.import))
(declare (uses keysmod.import))
(declare (uses dbmod.import))
(declare (uses apimod.import))
(declare (uses cookie.import))
(declare (uses megamod.import))
(declare (uses pgdbmod.import))
(declare (uses runsmod.import))
(declare (uses stml2.import))
(declare (uses tasksmod.import))
(declare (uses testsmod.import))
(declare (uses ulex.import))
(configf:set-debug-printers debug:print debug:print-info debug:print-error *default-log-port*)
(define *db* #f) ;; this is only for the repl, do not use in general!!!!
(define *default-log-port* (current-error-port))
|
>
>
>
>
>
|
>
|
|
|
>
|
|
>
|
>
|
|
|
|
>
|
|
|
|
>
|
|
|
>
>
>
>
>
>
>
>
<
<
<
|
|
|
|
|
|
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
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
|
;; Added for csv stuff - will be removed
;;
(use sparse-vectors)
(declare (uses mtargs))
(declare (uses mtconfigf))
(declare (uses stml2))
(declare (uses ulex))
(import (prefix mtargs args:))
(import (prefix mtconfigf configf:))
(import cookie)
(import stml2)
(import ulex)
;; order matters?
(declare (uses commonmod))
(declare (uses itemsmod))
(declare (uses apimod))
(declare (uses cookie))
(declare (uses keysmod))
(declare (uses odsmod))
(declare (uses dbmod))
(declare (uses servermod))
(declare (uses ducttape-lib))
(declare (uses mutils))
(declare (uses pgdbmod))
(declare (uses pkts))
(declare (uses rmtmod))
(declare (uses mtmod))
(declare (uses subrunmod))
(declare (uses runsmod))
(declare (uses tasksmod))
(declare (uses testsmod))
(declare (uses megamod))
(import commonmod)
(import itemsmod)
(import keysmod)
(import pgdbmod)
(import tasksmod)
(import odsmod)
(import dbmod)
(import servermod)
(import apimod)
(import ducttape-lib)
(import mutils)
(import pkts)
(import rmtmod)
(import mtmod)
(import testsmod)
(import subrunmod)
(import runsmod)
(import megamod)
;; NOTE: Order is important!
;; invoke the imports
(declare (uses mtargs.import))
(declare (uses mtconfigf.import))
(declare (uses cookie.import))
(declare (uses stml2.import))
(declare (uses ulex.import))
;; invoke the imports
(declare (uses commonmod.import))
(declare (uses itemsmod.import))
(declare (uses keysmod.import))
(declare (uses pgdbmod.import))
(declare (uses tasksmod.import))
(declare (uses odsmod.import))
(declare (uses dbmod.import))
(declare (uses servermod.import))
(declare (uses apimod.import))
(declare (uses ducttape-lib.import))
(declare (uses mutils.import))
(declare (uses pkts.import))
(declare (uses rmtmod.import))
(declare (uses mtmod.import))
(declare (uses testsmod.import))
(declare (uses subrunmod.import))
(declare (uses runsmod.import))
(declare (uses megamod.import))
(configf:set-debug-printers debug:print debug:print-info debug:print-error *default-log-port*)
(define *db* #f) ;; this is only for the repl, do not use in general!!!!
(define *default-log-port* (current-error-port))
|