Overview
| Comment: | Fixed a rollup issue due to wrongly coded call in rmt.scm |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.60 |
| Files: | files | file ages | folders |
| SHA1: |
1900a1979fad8bf9ff75300f5d6c84a9 |
| User & Date: | mrwellan on 2015-08-28 09:17:59 |
| Other Links: | branch diff | manifest | tags |
Context
|
2015-08-28
| ||
| 17:20 | Fixed couple bugs check-in: 0feca1db84 user: mrwellan tags: v1.60 | |
| 09:17 | Fixed a rollup issue due to wrongly coded call in rmt.scm check-in: 1900a1979f user: mrwellan tags: v1.60 | |
|
2015-08-27
| ||
| 23:47 | Allow overriding num reruns from config, added to docs check-in: 8c4b1ebbb6 user: matt tags: v1.60 | |
Changes
Modified rmt.scm from [592faf391b] to [a6725903b6].
| ︙ | |||
528 529 530 531 532 533 534 | 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 | - + | (define (rmt:roll-up-pass-fail-counts run-id test-name item-path state status) (rmt:send-receive 'roll-up-pass-fail-counts run-id (list run-id test-name item-path state status))) (define (rmt:update-pass-fail-counts run-id test-name) (rmt:general-call 'update-pass-fail-counts run-id (list run-id test-name run-id test-name run-id test-name))) (define (rmt:top-test-set-per-pf-counts run-id test-name) |
| ︙ |
Modified tests/unittests/runs.scm from [17931d05af] to [6312499606].
| ︙ | |||
151 152 153 154 155 156 157 | 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 | - + + + + + |
(test "launch-test" #t
(string?
(file-exists?
;; (launch-test test-id run-id run-info keyvals runname test-conf test-name test-path itemdat params)
(launch-test 30001 1 rinfo keyvals "run1" tconfig "test1" test-path '() (make-hash-table)))))
|
| ︙ | |||
318 319 320 321 322 323 324 | 322 323 324 325 326 327 328 329 330 331 332 333 334 335 | - - - - - | (print "Waiting for server to be done, should be about 20 seconds") (test "server stop" #f (let ((hostname (car *runremote*)) (port (cadr *runremote*))) (tasks:kill-server #t hostname port server-pid 'http) (open-run-close tasks:get-best-server tasks:open-db))) |