@@ -22,10 +22,11 @@ ;;====================================================================== (declare (unit launch)) (declare (uses subrun)) (declare (uses common)) +(declare (uses debugprint)) (declare (uses commonmod)) (declare (uses configf)) (declare (uses db)) (declare (uses ezsteps)) (declare (uses dbfile)) @@ -35,11 +36,12 @@ call-with-environment-variables csv) (use typed-records pathname-expand matchable) (import (prefix base64 base64:) (prefix sqlite3 sqlite3:) - (prefix mtargs args:)) + (prefix mtargs args:) + debugprint) (include "common_records.scm") (include "key_records.scm") (include "db_records.scm") (include "megatest-fossil-hash.scm")