Overview
| Comment: | Cherrypicked test path reordering per Tal's request. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.55 | v1.5525 |
| Files: | files | file ages | folders |
| SHA1: |
b541c8f3a1e362ad5f39a7720bba8274 |
| User & Date: | matt on 2015-02-03 22:14:36 |
| Other Links: | branch diff | manifest | tags |
Context
|
2015-03-23
| ||
| 23:56 | nada check-in: 810dd1492f user: matt tags: v1.60 | |
|
2015-03-13
| ||
| 00:38 | Basic dump to json from list-runs check-in: 1753b52784 user: matt tags: v1.55 | |
|
2015-02-03
| ||
| 22:14 | Cherrypicked test path reordering per Tal's request. check-in: b541c8f3a1 user: matt tags: v1.55, v1.5525 | |
|
2014-11-18
| ||
| 15:41 | Tweaked installall.sh for a RedHat install check-in: cbcc0afda3 user: mrwellan tags: v1.55 | |
Changes
Modified megatest-version.scm from [724ccf372e] to [ca9cc860b4].
1 2 3 4 5 | ;; Always use two digit decimal ;; 1.01, 1.02...1.10,1.11 ... 1.99,2.00.. (declare (unit megatest-version)) | | | 1 2 3 4 5 6 7 | ;; Always use two digit decimal ;; 1.01, 1.02...1.10,1.11 ... 1.99,2.00.. (declare (unit megatest-version)) (define megatest-version 1.5525) |
Modified tests.scm from [cf71f12de1] to [a0ed3411a7].
| ︙ | ︙ | |||
32 33 34 35 36 37 38 |
;; Call this one to do all the work and get a standardized list of tests
(define (tests:get-all)
(let* ((test-search-path (tests:get-tests-search-path *configdat*)))
(tests:get-valid-tests (make-hash-table) test-search-path)))
(define (tests:get-tests-search-path cfgdat)
(let ((paths (map cadr (configf:get-section cfgdat "tests-paths"))))
| | | 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 |
;; Call this one to do all the work and get a standardized list of tests
(define (tests:get-all)
(let* ((test-search-path (tests:get-tests-search-path *configdat*)))
(tests:get-valid-tests (make-hash-table) test-search-path)))
(define (tests:get-tests-search-path cfgdat)
(let ((paths (map cadr (configf:get-section cfgdat "tests-paths"))))
(append paths (list (conc *toppath* "/tests")))))
(define (tests:get-valid-tests test-registry tests-paths)
(if (null? tests-paths)
test-registry
(let loop ((hed (car tests-paths))
(tal (cdr tests-paths)))
(if (file-exists? hed)
|
| ︙ | ︙ |
tests/installall/config/megatest.config.dat became a regular file with contents [736a5da885].
tests/installall/config/runconfigs.config.dat became a regular file with contents [3b8f260acb].