Overview
| Comment: | Fixed genexample to fix call to simple-get-runs ==3.3/0.9/PASS/mars== |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.65-cleanup | v1.6565 |
| Files: | files | file ages | folders |
| SHA1: |
0dbbb708341d8642c91f96d51b72b0ac |
| User & Date: | jmoon18 on 2020-08-26 16:10:15 |
| Original Comment: | Fixed genexample to fix call to simple-get-runs |
| Other Links: | branch diff | manifest | tags |
Context
|
2020-08-26
| ||
| 17:48 | Added option to change the get-delay function by setting [load] new-load-method in the megatest.config ==/2.9/0.9/PASS/1204/mars/== check-in: 5c50817156 user: jmoon18 tags: v1.65-cleanup, v1.6565 | |
| 16:10 | Fixed genexample to fix call to simple-get-runs ==3.3/0.9/PASS/mars== check-in: 0dbbb70834 user: jmoon18 tags: v1.65-cleanup, v1.6565 | |
| 15:56 | Tweaked server throttle. Bumped version. check-in: fc0f14e78b user: mrwellan tags: v1.65-cleanup, v1.6565 | |
Changes
Modified genexample.scm from [8d68fc70de] to [509120626b].
| ︙ | ︙ | |||
422 423 424 425 426 427 428 |
(if (not (file-exists? (conc dest-path "/" rdbname)))
(begin
(create-directory (conc dest-path "/" rdbname "/sxml") #t)
(with-output-to-file (conc dest-path "/" rdbname "/sheet-names.cfg")
(lambda ()(print))))))
'("stepsinfo" "miscinfo"))
| | | 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 |
(if (not (file-exists? (conc dest-path "/" rdbname)))
(begin
(create-directory (conc dest-path "/" rdbname "/sxml") #t)
(with-output-to-file (conc dest-path "/" rdbname "/sheet-names.cfg")
(lambda ()(print))))))
'("stepsinfo" "miscinfo"))
(let* ((runs (rmt:simple-get-runs (or runname "%") #f #f (or target "%") 0))
(tests (make-hash-table)) ;; just tests
(fullt (make-hash-table)) ;; all test/items
(testreg (make-hash-table)) ;; for the testconfigs
(stepsrdb (conc dest-path "/stepsinfo"))
(miscrdb (conc dest-path "/miscinfo")))
(if (> (length runs) 1)
(debug:print-info 0 *default-log-port* "More than one run matches, first found data will be used."))
|
| ︙ | ︙ |