Overview
| Comment: | The NOTHING LEFT TO RUN section is not getting hit. Keeping it for now. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.64-end-runs-fix |
| Files: | files | file ages | folders |
| SHA1: |
a16fc0d2d04199c1d6664bc80706f165 |
| User & Date: | matt on 2017-06-14 00:14:34 |
| Other Links: | branch diff | manifest | tags |
Context
|
2017-06-25
| ||
| 22:16 | Updating to v1.65. Leaf check-in: aca1299f55 user: matt tags: v1.65-end-runs-fix | |
|
2017-06-14
| ||
| 00:14 | The NOTHING LEFT TO RUN section is not getting hit. Keeping it for now. Closed-Leaf check-in: a16fc0d2d0 user: matt tags: v1.64-end-runs-fix | |
|
2017-06-13
| ||
| 23:49 | Passes bigrun multi-level dependencies test. toprun and fullrun still appear to timeout. check-in: 6f43371532 user: matt tags: v1.64-end-runs-fix | |
Changes
Modified runs.scm from [c3d225d834] to [ea24c137d5].
| ︙ | ︙ | |||
806 807 808 809 810 811 812 813 814 815 816 817 818 819 | (reg (runs:testdat-reg testdat)) (reruns (runs:testdat-reruns testdat)) (test-name (runs:testdat-test-name testdat)) (item-path (runs:testdat-item-path testdat)) (jobgroup (runs:testdat-jobgroup testdat)) (waitons (runs:testdat-waitons testdat)) (item-path (runs:testdat-item-path testdat)) (testmode (runs:testdat-testmode testdat)) (newtal (runs:testdat-newtal testdat)) (itemmaps (runs:testdat-itemmaps testdat)) (test-record (runs:testdat-test-record testdat)) (prereqs-not-met (runs:testdat-prereqs-not-met testdat)) (reglen (runs:dat-reglen runsdat)) | > | 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 | (reg (runs:testdat-reg testdat)) (reruns (runs:testdat-reruns testdat)) (test-name (runs:testdat-test-name testdat)) (item-path (runs:testdat-item-path testdat)) (jobgroup (runs:testdat-jobgroup testdat)) (waitons (runs:testdat-waitons testdat)) (item-path (runs:testdat-item-path testdat)) (tfullname (db:test-make-full-name test-name item-path)) (testmode (runs:testdat-testmode testdat)) (newtal (runs:testdat-newtal testdat)) (itemmaps (runs:testdat-itemmaps testdat)) (test-record (runs:testdat-test-record testdat)) (prereqs-not-met (runs:testdat-prereqs-not-met testdat)) (reglen (runs:dat-reglen runsdat)) |
| ︙ | ︙ | |||
855 856 857 858 859 860 861 | (string-intersperse (map (lambda (t) (if (vector? t) (conc (db:test-get-state t) "/" (db:test-get-status t)) (conc " WARNING: t is not a vector=" t ))) prereqs-not-met) ", ") ") fails: " fails | | | | 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 |
(string-intersperse
(map (lambda (t)
(if (vector? t)
(conc (db:test-get-state t) "/" (db:test-get-status t))
(conc " WARNING: t is not a vector=" t )))
prereqs-not-met)
", ") ") fails: " fails
"\nregistered? " (hash-table-ref/default test-registry tfullname #f))
(if (not (hash-table-ref/default test-registry tfullname #f))(hash-table-set! test-registry tfullname #f))
(if (and (not (null? prereqs-not-met))
(runs:lownoise (conc "waiting on tests " prereqs-not-met hed) 60))
(debug:print-info 2 *default-log-port* "waiting on tests; " (string-intersperse (runs:mixed-list-testname-and-testrec->list-of-strings prereqs-not-met) ", ")))
;; Don't know at this time if the test have been launched at some time in the past
;; i.e. is this a re-launch?
|
| ︙ | ︙ | |||
965 966 967 968 969 970 971 |
(list (runs:queue-next-hed tal reg reglen regfull)
(runs:queue-next-tal tal reg reglen regfull)
(runs:queue-next-reg tal reg reglen regfull)
reruns)
#f))
;; this might speed things up!?
| > | | | | | | | 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 |
(list (runs:queue-next-hed tal reg reglen regfull)
(runs:queue-next-tal tal reg reglen regfull)
(runs:queue-next-reg tal reg reglen regfull)
reruns)
#f))
;; this might speed things up!?
((and (eq? 0 num-running)
(null? (filter (lambda (x)
(not (member (hash-table-ref/default test-registry (db:test-make-full-name test-name item-path) 'x)
'(done removed))))
(hash-table-keys test-registry))))
(debug:print 0 *default-log-port* "NOTHING LEFT TO RUN!")
#f)
;; must be we have unmet prerequisites
;;
(else
(debug:print 4 *default-log-port* "FAILS: " fails)
;; If one or more of the prereqs-not-met are FAIL then we can issue
;; a message and drop hed from the items to be processed.
|
| ︙ | ︙ |