Overview
Comment: | Deal better with malformed .final-status files |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | v1.80-revolution |
Files: | files | file ages | folders |
SHA1: |
ddf07290ee9859660d09df78f5c640d2 |
User & Date: | mrwellan on 2024-01-26 09:43:00 |
Other Links: | branch diff | manifest | tags |
Context
2024-01-26
| ||
09:44 | Put out useful message on bad timestring inputs from config files. check-in: 938ab5c99e user: mrwellan tags: v1.80-revolution | |
09:43 | Deal better with malformed .final-status files check-in: ddf07290ee user: mrwellan tags: v1.80-revolution | |
2024-01-23
| ||
18:57 | Changed get-cpu-load to commonmod:get-cpu-load in tests.scm check-in: 5939138243 user: mmgraham tags: v1.80-revolution | |
Changes
Modified rmtmod.scm from [052d2f8699] to [883a743d2f].
︙ | ︙ | |||
207 208 209 210 211 212 213 | ;; first verify we are able to write the output file (if (not (file-read-access? infile)) (begin (debug:print 2 *default-log-port* "ERROR: cannot read " infile) (debug:print 2 *default-log-port* "ERROR: run-dir is " run-dir) #f ) | | > > | | 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 | ;; first verify we are able to write the output file (if (not (file-read-access? infile)) (begin (debug:print 2 *default-log-port* "ERROR: cannot read " infile) (debug:print 2 *default-log-port* "ERROR: run-dir is " run-dir) #f ) (let ((res (with-input-from-file infile read-lines))) (if (null? res) #f (string-split (car res))))))) ;; select end_time-now from ;; (select testname,item_path,event_time+run_duration as ;; end_time,strftime('%s','now') as now from tests where state in ;; ('RUNNING','REMOTEHOSTSTART','LAUNCHED')); ;; ;; NOT EASY TO MIGRATE TO db{file,mod} |
︙ | ︙ |