@@ -34,13 +34,15 @@ (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 keysmod)) (declare (uses dbmod)) (declare (uses ducttape-lib)) (declare (uses megamod)) (declare (uses mutils)) (declare (uses pgdbmod)) @@ -50,14 +52,15 @@ (declare (uses stml2)) (declare (uses tasksmod)) (declare (uses testsmod)) (declare (uses ulex)) -(import apimod) -;; (import commonmod) -(import cookie) +(import commonmod) +(import keysmod) (import dbmod) +(import apimod) +(import cookie) (import ducttape-lib) (import megamod) (import mutils) (import pgdbmod) (import pkts) @@ -65,15 +68,22 @@ (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 commonmod.import)) (declare (uses cookie.import)) -(declare (uses dbmod)) (declare (uses ducttape-lib.import)) (declare (uses megamod.import)) (declare (uses mutils.import)) (declare (uses pkts.import)) (declare (uses pgdbmod.import)) @@ -82,14 +92,10 @@ (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))