@@ -23,11 +23,12 @@ (define (toplevel-command . a) #f) (use (prefix sqlite3 sqlite3:) srfi-1 posix regex regex-case srfi-69 (prefix base64 base64:) readline apropos json http-client directory-utils typed-records http-client srfi-18 extras format - (prefix mtconfigf configf:)) + (prefix mtconfigf configf:) + (prefix margs args:)) ;; Added for csv stuff - will be removed ;; (use sparse-vectors) @@ -54,15 +55,18 @@ (import rmtmod) (declare (uses dbmod)) (import dbmod) (declare (uses runsmod)) (import runsmod) +(declare (uses testsmod)) +(import testsmod) (declare (uses megamod)) (import megamod) ;; invoke the imports (declare (uses commonmod.import)) +(declare (uses testsmod.import)) (declare (uses rmtmod.import)) (declare (uses runsmod.import)) (declare (uses megamod.import)) (configf:set-debug-printers debug:print debug:print-info debug:print-error *default-log-port*)