@@ -39,14 +39,18 @@ (declare (uses rmtmod)) (declare (uses ezsteps)) ;; (declare (uses sdb)) ;; (declare (uses filedb)) (declare (uses subrun)) +(declare (uses debugprint)) + (include "common_records.scm") (include "db_records.scm") (include "run_records.scm") + +(import debugprint) (define (dboard:launch-testpanel run-id test-id) (let* ((dboardexe (common:find-local-megatest "dashboard")) (cmd (conc dboardexe " -test " run-id "," test-id