Index: runs.scm ================================================================== --- runs.scm +++ runs.scm @@ -500,12 +500,12 @@ ;;(set! remtests (runs:toposort remtests all-tests-registry)) ;;(loop (car remtests)(cdr remtests)) (loop processed new-hed new-tal) ))))))) - - + ;; above: populate test-records hash + ;; below - manage call to run-tests-queue (counter-reset 'rtloop) (debug:print-info 0 "BB: Finished elaboration of waiton dependencies (maybe?)") (if (not (null? required-tests)) (debug:print-info 0 "BB Adding \"" (string-intersperse required-tests " ") "\" to the run queue")) ; BB changed 1 to 0 ;; NOTE: these are all parent tests, items are not expanded yet.