Overview
Comment: | Cleaned up output a little |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
b3c755e579799593e73fd102a7dacde1 |
User & Date: | matt on 2012-03-26 00:39:00 |
Other Links: | manifest | tags |
Context
2012-03-26
| ||
10:52 | Added check for [include ...] in runconfigs and fixed where -itempatt was not being respected check-in: f6681ce535 user: matt tags: trunk | |
00:39 | Cleaned up output a little check-in: b3c755e579 user: matt tags: trunk | |
00:23 | Add trimming of tests from launch list to cut down on irrelevant queries and speed up launching check-in: 5501f178c7 user: matt tags: trunk | |
Changes
Modified runs.scm from [8cce014215] to [b3a5700d11].
︙ | ︙ | |||
300 301 302 303 304 305 306 | ;; couldn't run, take a breather (thread-sleep! 0.5) (loop (car newtal)(cdr newtal)))))) ;; 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 | | > > > | 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 | ;; couldn't run, take a breather (thread-sleep! 0.5) (loop (car newtal)(cdr newtal)))))) ;; 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) (> (length items) 0) (> (length (car items)) 0)) (pp items)) ;; (if (>= *verbosity* 5) ;; (begin ;; (print "items: ") (pp (item-assoc->item-list items)) ;; (print "itemstable: ")(pp (item-table->item-list itemstable)))) (for-each (lambda (my-itemdat) (let* ((new-test-record (let ((newrec (make-tests:testqueue))) |
︙ | ︙ |