15
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
|
15
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
|
+
-
-
-
-
-
+
+
+
+
+
-
-
-
-
-
+
+
+
+
+
|
;;
;; 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 rmtmod))
(declare (uses ulex))
(declare (uses itemsmod))
(declare (uses commonmod))
(declare (uses apimod))
(declare (uses dbmod))
(declare (uses apimod))
(declare (uses commonmod))
(declare (uses dbmod))
(declare (uses itemsmod))
(declare (uses ulex))
(module rmtmod
*
(import scheme chicken data-structures extras)
(import (prefix sqlite3 sqlite3:) posix typed-records srfi-18 srfi-69 format ports srfi-1 matchable)
(import (prefix ulex ulex:))
(import
commonmod
itemsmod
apimod
dbmod)
(import commonmod)
(import itemsmod)
(import apimod)
(import dbmod)
;; (include "rmt-inc.scm")
;;
;; THESE ARE ALL CALLED ON THE CLIENT SIDE!!!
;;
|