Differences From Artifact [799fcfd358]:
- File megatest.scm — part of check-in [6ff4310a7a] at 2021-02-05 15:36:34 on branch v1.65-real — merged in changes for wildcard target in remove runs, support for dashboard in sles12, and archival of rerun data. (user: mmgraham, size: 109943) [annotate] [blame] [check-ins using]
To Artifact [35ed864745]:
- File attic/megatest.scm — part of check-in [101ee7c52b] at 2021-03-06 04:39:46 on branch v1.65-real-chicken-5 — Try a grounds-up switch to chicken-5 (user: matt, size: 109950) [annotate] [blame] [check-ins using]
- File megatest.scm — part of check-in [259b439f94] at 2021-02-14 20:26:08 on branch v1.65-real — More minor fixes and cleanup. (user: matt, size: 109950) [annotate] [blame] [check-ins using]
| ︙ | ︙ | |||
1326 1327 1328 1329 1330 1331 1332 |
(test-id (if (member "id" tests-spec)(get-value-by-fieldname test test-field-index "id" ) #f)) ;; (db:test-get-id test))
(testname (if (member "testname" tests-spec)(get-value-by-fieldname test test-field-index "testname" ) #f)) ;; (db:test-get-testname test))
(itempath (if (member "item_path" tests-spec)(get-value-by-fieldname test test-field-index "item_path" ) #f)) ;; (db:test-get-item-path test))
(fullname (conc testname
(if (equal? itempath "")
""
(conc "/" itempath ))))
| | | 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 |
(test-id (if (member "id" tests-spec)(get-value-by-fieldname test test-field-index "id" ) #f)) ;; (db:test-get-id test))
(testname (if (member "testname" tests-spec)(get-value-by-fieldname test test-field-index "testname" ) #f)) ;; (db:test-get-testname test))
(itempath (if (member "item_path" tests-spec)(get-value-by-fieldname test test-field-index "item_path" ) #f)) ;; (db:test-get-item-path test))
(fullname (conc testname
(if (equal? itempath "")
""
(conc "/" itempath ))))
(testdat-raw (map vector->list (rmt:read-test-data-varpatt run-id test-id categorypatt setvarpatt)))
(testdat (filter
(lambda (x)
(not (equal? "logpro"
(list-ref x 10))))
testdat-raw)))
(map
(lambda (item)
|
| ︙ | ︙ |