@@ -34,10 +34,11 @@ ;; (declare (uses sdb)) ;; (declare (uses filedb)) (declare (uses subrun)) (declare (uses testsmod)) (declare (uses subrunmod)) +(declare (uses megatestmod)) (use format fmt) (require-library iup) (import (prefix iup iup:)) @@ -53,11 +54,13 @@ (import commonmod configfmod rmtmod testsmod subrunmod - debugprint) + debugprint + megatestmod + ) (define (dboard:launch-testpanel run-id test-id) (let* ((dboardexe (common:find-local-megatest "dashboard")) (cmd (conc dboardexe " -test " run-id "," test-id