Changes In Branch v1.70-defunct Through [c46d9b2b72] Excluding Merge-Ins
This is equivalent to a diff from 568abab962 to c46d9b2b72
|
2020-10-02
| ||
| 21:31 | Merged v1.6564-refactor check-in: b6343fc4a4 user: matt tags: v1.70-defunct | |
| 20:59 | merge-1 check-in: c46d9b2b72 user: matt tags: v1.70-defunct | |
| 16:03 | If local check pstree locally ==/3.05/0.8/PASS/1202/mars/== check-in: 53cfda8951 user: matt tags: v1.70-defunct | |
|
2020-08-24
| ||
| 17:12 | Fixes for genexample ==6.6/1.1/1201/WARN/mars== check-in: 0c2987faad user: jmoon18 tags: v1.65 | |
|
2020-08-22
| ||
| 14:14 | Merged in partial content from v1.66-captain-ulex work. ==7.2/0.9/1201/mars== check-in: 070ebd2d0d user: matt tags: v1.65-cleanup | |
|
2020-08-21
| ||
| 16:51 | Merging v1.66 *applicable* changes to v1.65. check-in: 48f4863bc1 user: mrwellan tags: v1.65-merge-forward-v1.66 | |
| 10:42 | Removed row-indices print that was spamming console while dashboard was in summary mode ==/8.99/1.6/WARN/1203/orion/== check-in: 568abab962 user: jmoon18 tags: v1.65 | |
| 10:00 | Removed junk noise ==/6.2/0.8/WARN/1202/mars/== check-in: 46d8ccee29 user: mrwellan tags: v1.65 | |
Modified launch.scm from [747c3edf8a] to [924f51a8e1].
| ︙ | ︙ | |||
944 945 946 947 948 949 950 |
(item-path (vector-ref running-test 11)))
(debug:print 0 *default-log-port* "test " test-name "/" item-path " not completed")
(if (not (null? tal))
(loop (car tal) (cdr tal)))))))))))
(define (launch:is-test-alive host pid)
(if (and host pid (not (equal? host "n/a")))
| > > | | 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 |
(item-path (vector-ref running-test 11)))
(debug:print 0 *default-log-port* "test " test-name "/" item-path " not completed")
(if (not (null? tal))
(loop (car tal) (cdr tal)))))))))))
(define (launch:is-test-alive host pid)
(if (and host pid (not (equal? host "n/a")))
(let* ((is-local (equal? host (get-host-name)))
(ssh-cmd (if is-local " " (conc "ssh " host " ")))
(cmd (conc ssh-cmd "pstree -A " pid))
(output (with-input-from-pipe cmd read-lines)))
(debug:print 2 *default-log-port* "Running " cmd " received " output)
(if (eq? (length output) 0)
#f
#t))
#t))
|
| ︙ | ︙ |