Megatest

Check-in [d3fc157db1]
Login
Overview
Comment:Fixed typo
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.44
Files: files | file ages | folders
SHA1: d3fc157db1d4170f1e45c93d0d2c90f49f2de64b
User & Date: mrwellan on 2012-06-27 13:51:30
Other Links: branch diff | manifest | tags
Context
2012-06-27
15:21
Fixed db:get-test-data-by-id to fail gracefully check-in: 3aef5315e7 user: mrwellan tags: v1.44, v1.4402
13:51
Fixed typo check-in: d3fc157db1 user: mrwellan tags: v1.44
2012-06-26
14:06
Fixed bug with finding wrong megatest.config and megatest.db due to usage of symlinks check-in: 0438d75d6c user: mrwellan tags: v1.44
Changes

Modified runs.scm from [c387192604] to [25e65a825b].

370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
			  (debug:print 4 "INFO: Shouldn't really get here, race condition? Unable to launch more tests at this moment, killing time ...")
			  (thread-sleep! 0.1) ;; long sleep here - no resources, may as well be patient
			  ;; we made new tal by sticking hed at the back of the list
			  (loop (car newtal)(cdr newtal)))
			;; the waiton is FAIL so no point in trying to run hed ever again
			(if (not (null? tal))
			    (begin
			      (debug:print 1 "WARN: Dropping test " (db:test-get-test-name hed) "/" (db:test-get-item-path hed)
					   " from the launch list as it has prerequistes that are FAIL")
			      (loop (car tal)(cdr tal)))))))))
	     
	     ;; case where an items came in as a list been processed
	     ((and (list? items)     ;; thus we know our items are already calculated
		   (not   itemdat)) ;; and not yet expanded into the list of things to be done
	      (if (and (>= *verbosity* 1)







|







370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
			  (debug:print 4 "INFO: Shouldn't really get here, race condition? Unable to launch more tests at this moment, killing time ...")
			  (thread-sleep! 0.1) ;; long sleep here - no resources, may as well be patient
			  ;; we made new tal by sticking hed at the back of the list
			  (loop (car newtal)(cdr newtal)))
			;; the waiton is FAIL so no point in trying to run hed ever again
			(if (not (null? tal))
			    (begin
			      (debug:print 1 "WARN: Dropping test " (db:test-get-testname hed) "/" (db:test-get-item-path hed)
					   " from the launch list as it has prerequistes that are FAIL")
			      (loop (car tal)(cdr tal)))))))))
	     
	     ;; case where an items came in as a list been processed
	     ((and (list? items)     ;; thus we know our items are already calculated
		   (not   itemdat)) ;; and not yet expanded into the list of things to be done
	      (if (and (>= *verbosity* 1)