Overview
| Comment: | fixed typo ==11.11/1.5/WARN/1206/orion== |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.65-cleanup |
| Files: | files | file ages | folders |
| SHA1: |
80394e6b0d619871ffca64b3586858fd |
| User & Date: | matt on 2020-08-30 22:12:07 |
| Original Comment: | fixed typo |
| Other Links: | branch diff | manifest | tags |
Context
|
2020-08-31
| ||
| 09:09 | Don't bypass runs:expand-items on max jobs. ==6.2/1.9/WARN/1201/mars== check-in: 890b2e71ae user: matt tags: v1.65-cleanup, v16566 | |
|
2020-08-30
| ||
| 22:12 | fixed typo ==11.11/1.5/WARN/1206/orion== check-in: 80394e6b0d user: matt tags: v1.65-cleanup | |
| 22:02 | ease load on pre-launch checks if there are more than 25 jobs slots available. NOTE: Unclear if last few commits are genuinely useful check-in: c141e77533 user: matt tags: v1.65-cleanup | |
Changes
Modified runs.scm from [9c5af76de5] to [ff840754cb].
| ︙ | ︙ | |||
1681 1682 1683 1684 1685 1686 1687 | (can-run-more-tests (runs:dat-can-run-more-tests runsdat)) (last-jobs-check-time (runs:dat-last-jobs-check-time runsdat)) (should-check-jobs (match can-run-more-tests ((can-run-more-flag num-running nr-in-jobgroup max-concurrent-jobs . params) (if (< (- max-concurrent-jobs num-running) 25) (begin (debug:print-info 0 *default-log-port* | | | 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 |
(can-run-more-tests (runs:dat-can-run-more-tests runsdat))
(last-jobs-check-time (runs:dat-last-jobs-check-time runsdat))
(should-check-jobs (match can-run-more-tests
((can-run-more-flag num-running nr-in-jobgroup max-concurrent-jobs . params)
(if (< (- max-concurrent-jobs num-running) 25)
(begin
(debug:print-info 0 *default-log-port*
"less than 20 jobs headroom, ("max-concurrent-jobs
"-"num-running")>20. Forcing prelaunch check.")
#t)
#f))
(else #f)))) ;; no record yet
(if should-check-jobs
(let loop-can-run-more
((res (runs:can-run-more-tests runsdat run-id jobgroup max-concurrent-jobs))
|
| ︙ | ︙ |