Overview
Context
Changes
Modified commonmod.scm
from [d0192acf61]
to [c77b3c0ca1].
︙ | | |
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
|
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
|
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
-
-
+
-
-
-
+
+
+
+
+
+
|
(module commonmod
*
(import scheme chicken data-structures extras)
(use (prefix sqlite3 sqlite3:) posix typed-records srfi-18
srfi-1 files format srfi-13 matchable
srfi-69 ports
(prefix base64 base64:)
regex-case regex hostinfo srfi-4
pkts (prefix dbi dbi:)
stack
md5
message-digest
srfi-1 files format srfi-13 matchable
srfi-69 ports
(prefix base64 base64:)
regex-case regex hostinfo srfi-4
(prefix dbi dbi:)
stack
md5
message-digest
(prefix mtconfigf configf:)
z3
z3
(prefix mtargs args:)
directory-utils
sparse-vectors)
directory-utils
sparse-vectors)
(import pkts)
(import (prefix mtconfigf configf:))
(import (prefix mtargs args:))
(include "common_records.scm")
(include "megatest-fossil-hash.scm")
(include "megatest-version.scm")
;; no need to export this
(define *verbosity-cache* (make-hash-table))
|
︙ | | |
Modified megamod.scm
from [8bf7bf0491]
to [8e380fd6d6].
︙ | | |
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
+
-
+
|
;;======================================================================
(declare (unit megamod))
(declare (uses stml2))
(declare (uses mtargs))
(declare (uses commonmod))
(declare (uses apimod))
(declare (uses commonmod))
(declare (uses keysmod))
(declare (uses dbmod))
(declare (uses ducttape-lib))
(declare (uses itemsmod))
(declare (uses mtconfigf))
(declare (uses odsmod))
(declare (uses pgdbmod))
(declare (uses pkts))
|
︙ | | |
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
|
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
+
+
-
-
-
+
+
+
|
;; (define config:eval-string-in-environment configf:eval-string-in-environment)
(import spiffy)
(import stml2)
(import (prefix mtargs args:))
;; Order here is important!
(import commonmod)
(import apimod)
(import commonmod)
(import dbmod)
(import keysmod)
(import dbmod)
(import apimod)
(import ducttape-lib)
(import itemsmod)
(import pkts)
(import pgdbmod)
(import rmtmod)
(import runsmod)
(import servermod)
|
︙ | | |
Modified megatest.scm
from [fbcdb6977c]
to [eadab888d3].
︙ | | |
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
|
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
|
+
+
-
-
+
+
-
-
-
-
+
+
+
+
+
+
+
-
-
-
-
+
+
+
+
+
+
+
+
+
-
-
-
-
|
(declare (uses mtargs))
(declare (uses mtconfigf))
(import (prefix mtargs args:))
(import (prefix mtconfigf configf:))
;; order maters
(declare (uses commonmod))
(declare (uses apimod))
;; (declare (uses commonmod))
(declare (uses cookie))
(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 apimod)
;; (import commonmod)
(import cookie)
(import dbmod)
(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 apimod.import))
;; (declare (uses commonmod.import))
(declare (uses cookie.import))
(declare (uses dbmod))
(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 ducttape-lib.import))
(declare (uses megamod.import))
(declare (uses mutils.import))
(declare (uses pkts.import))
(declare (uses pgdbmod.import))
(declare (uses rmtmod.import))
(declare (uses runsmod.import))
(declare (uses stml2.import))
(declare (uses tasksmod.import))
(declare (uses testsmod.import))
(declare (uses ulex.import))
;; invoke the imports
(declare (uses mtargs.import))
(declare (uses mtconfigf.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))
(include "common_records.scm")
|
︙ | | |