Megatest

Check-in [ac97c2c2c9]
Login
Overview
Comment:Added an extra sleep for case when can't run more
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | test-specific-db
Files: files | file ages | folders
SHA1: ac97c2c2c994bcc2765a113ac94f5859c4f49408
User & Date: matt on 2012-09-26 14:34:20
Other Links: branch diff | manifest | tags
Context
2012-09-26
14:42
Removed a not needed finalize check-in: 47e9f43714 user: matt tags: test-specific-db
14:34
Added an extra sleep for case when can't run more check-in: ac97c2c2c9 user: matt tags: test-specific-db
14:10
Fixed typo, yeah, right, it was a typo check-in: 3ec351303e user: matt tags: test-specific-db
Changes

Modified runs.scm from [b4a9a67dac] to [2bc93c5e34].

472
473
474
475
476
477
478


479

480
481
482
483
484
485
486
472
473
474
475
476
477
478
479
480

481
482
483
484
485
486
487
488







+
+
-
+







			;; 	     "\n  hed:            " hed 
			;; 	     "\n fails:           " (string-intersperse (map db:test-get-testname fails) ",")
			;; 	     "\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
		    (begin
		      (thread-sleep! (+ 1 *global-delta*))
		    (loop (car newtal)(cdr newtal)))))
		      (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))))
	  
	  ;; we get here on "drop through" - loop for next test in queue