Index: runs.scm ================================================================== --- runs.scm +++ runs.scm @@ -474,11 +474,13 @@ ;; "\n testmode: " testmode ;; "\n prereqs-not-met: " (pretty-string prereqs-not-met) ;; "\n items: " items) (loop (car newtal)(cdr newtal))))) ;; if can't run more just loop with next possible test - (loop (car newtal)(cdr newtal))))) + (begin + (thread-sleep! (+ 1 *global-delta*)) + (loop (car newtal)(cdr newtal)))))) ;; this case should not happen, added to help catch any bugs ((and (list? items) itemdat) (debug:print 0 "ERROR: Should not have a list of items in a test and the itemspath set - please report this") (exit 1))))