Overview
| Comment: | Bumped version to v1.6105 |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.61 |
| Files: | files | file ages | folders |
| SHA1: |
ccacf1d5569aecf5a2bcd49b21d7ebf9 |
| User & Date: | mrwellan on 2016-09-13 09:56:12 |
| Other Links: | branch diff | manifest | tags |
Context
|
2016-09-13
| ||
| 11:14 | Bumped number of tests pulled on changing constraints check-in: 3a6f875dab user: mrwellan tags: v1.61 | |
| 09:56 | Bumped version to v1.6105 check-in: ccacf1d556 user: mrwellan tags: v1.61 | |
|
2016-09-10
| ||
| 19:08 | Added commondat to params for user tabs check-in: c6cdc6e1e6 user: matt tags: v1.61 | |
Changes
Modified megatest-version.scm from [1eea1a53bb] to [9743cff00a].
1 2 3 4 5 | ;; Always use two or four digit decimal ;; 1.01, 1.02...1.10,1.11,1.1101 ... 1.99,2.00.. (declare (unit megatest-version)) | | | 1 2 3 4 5 6 7 | ;; Always use two or four digit decimal ;; 1.01, 1.02...1.10,1.11,1.1101 ... 1.99,2.00.. (declare (unit megatest-version)) (define megatest-version 1.6105) |
Modified megatest.scm from [8777b38b5a] to [36ef6b845c].
| ︙ | ︙ | |||
1039 1040 1041 1042 1043 1044 1045 | (testpatt (common:args-get-testpatt #f)) ;; (if (args:get-arg "-testpatt") ;; (args:get-arg "-testpatt") ;; "%")) (keys (rmt:get-keys)) ;; (db:get-keys dbstruct)) ;; (runsda t (db:get-runs dbstruct runpatt #f #f '())) (runsdat (rmt:get-runs-by-patt keys (or runpatt "%") (common:args-get-target) ;; (db:get-runs-by-patt dbstruct keys (or runpatt "%") (common:args-get-target) | | | 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 |
(testpatt (common:args-get-testpatt #f))
;; (if (args:get-arg "-testpatt")
;; (args:get-arg "-testpatt")
;; "%"))
(keys (rmt:get-keys)) ;; (db:get-keys dbstruct))
;; (runsda t (db:get-runs dbstruct runpatt #f #f '()))
(runsdat (rmt:get-runs-by-patt keys (or runpatt "%") (common:args-get-target) ;; (db:get-runs-by-patt dbstruct keys (or runpatt "%") (common:args-get-target)
#f #f '("id" "runname" "state" "status" "owner" "event_time" "comment") 0))
(runstmp (db:get-rows runsdat))
(header (db:get-header runsdat))
;; this is "-since" support. This looks at last mod times of <run-id>.db files
;; and collects those modified since the -since time.
(runs (if (and (not (null? runstmp))
(args:get-arg "-since"))
(let ((changed-ids (db:get-changed-run-ids (string->number (args:get-arg "-since")))))
|
| ︙ | ︙ |