Overview
| Comment: | Run colors under run summary tab |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.61 |
| Files: | files | file ages | folders |
| SHA1: |
c2024aec0b02cbb01cfe13f612e95e9c |
| User & Date: | ritikaag on 2016-08-23 15:37:30 |
| Other Links: | branch diff | manifest | tags |
Context
|
2016-08-25
| ||
| 10:59 | Added split for runs view. check-in: e03081d004 user: mrwellan tags: v1.61 | |
|
2016-08-23
| ||
| 15:44 | Merged changes from v1.61 check-in: 6a80452387 user: ritikaag tags: db | |
| 15:37 | Run colors under run summary tab check-in: c2024aec0b user: ritikaag tags: v1.61 | |
|
2016-08-22
| ||
| 21:03 | Use file modification times to minimize reading db files check-in: c9a8158d45 user: matt tags: v1.61 | |
Changes
Modified dcommon.scm from [29b42dc17c] to [92357a4de8].
| ︙ | ︙ | |||
273 274 275 276 277 278 279 |
'()
(let loop ((hed (car tests-dat))
(tal (cdr tests-dat))
(res '()))
(let* ((test-id (db:test-get-id hed)) ;; look at the tests-dat spec for locations
(test-name (db:test-get-testname hed))
(item-path (db:test-get-item-path hed))
| | | 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 |
'()
(let loop ((hed (car tests-dat))
(tal (cdr tests-dat))
(res '()))
(let* ((test-id (db:test-get-id hed)) ;; look at the tests-dat spec for locations
(test-name (db:test-get-testname hed))
(item-path (db:test-get-item-path hed))
(state (db:test-get-state hed))
(status (db:test-get-status hed))
(newitem (list test-name item-path (list test-id state status))))
(if (null? tal)
(reverse (cons newitem res))
(loop (car tal)(cdr tal)(cons newitem res)))))))
(define (dcommon:examine-xterm run-id test-id)
|
| ︙ | ︙ |