@@ -96,10 +96,11 @@
 		        "-test-status"
 		        "-gui"
 			"-runall"    ;; run all tests
 			"-remove-runs"
 			"-keepgoing"
+			"-usequeue"
 		       )
 		 args:arg-hash
 		 0))
 
 (if (args:get-arg "-h")
@@ -115,10 +116,14 @@
 (include "launch.scm")
 (include "runs.scm")
 ;; (include "gui.scm")
 
 (define *didsomething* #f)
+
+;;======================================================================
+;; Misc setup stuff
+;;======================================================================
 
 ;;======================================================================
 ;; Remove old run(s)
 ;;======================================================================