Overview
Comment: | Corrected order of adding items when doing expand |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | dev |
Files: | files | file ages | folders |
SHA1: |
c0ed667b5b433f3e38e03bdfb608d78e |
User & Date: | mrwellan on 2013-06-25 21:15:52 |
Other Links: | branch diff | manifest | tags |
Context
2013-06-26
| ||
00:53 | Refactored nested cond in run:tests to a proc runs:expand-items check-in: a3eca73bd8 user: matt tags: dev | |
2013-06-25
| ||
21:15 | Corrected order of adding items when doing expand check-in: c0ed667b5b user: mrwellan tags: dev | |
18:11 | Fixed issue with launch loop failing to exit. check-in: 813f2d347a user: mrwellan tags: dev | |
Changes
Modified runs.scm from [54a3cda2af] to [8b6a7fd7f9].
︙ | ︙ | |||
583 584 585 586 587 588 589 | (my-item-path (item-list->path my-itemdat))) (if (tests:match test-patts hed my-item-path required: required-tests) ;; (patt-list-match my-item-path item-patts) ;; yes, we want to process this item, NOTE: Should not need this check here! (let ((newtestname (runs:make-full-test-name hed my-item-path))) ;; test names are unique on testname/item-path (tests:testqueue-set-items! new-test-record #f) (tests:testqueue-set-itemdat! new-test-record my-itemdat) (tests:testqueue-set-item_path! new-test-record my-item-path) (hash-table-set! test-records newtestname new-test-record) | | | 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 | (my-item-path (item-list->path my-itemdat))) (if (tests:match test-patts hed my-item-path required: required-tests) ;; (patt-list-match my-item-path item-patts) ;; yes, we want to process this item, NOTE: Should not need this check here! (let ((newtestname (runs:make-full-test-name hed my-item-path))) ;; test names are unique on testname/item-path (tests:testqueue-set-items! new-test-record #f) (tests:testqueue-set-itemdat! new-test-record my-itemdat) (tests:testqueue-set-item_path! new-test-record my-item-path) (hash-table-set! test-records newtestname new-test-record) (set! tal (append tal (list newtestname))))))) ;; since these are itemized create new test names testname/itempath items) ;; At this point we have possibly added items to tal but all must be handed off to ;; INNER COND logic. I think loop without rotating the queue ;; (loop hed tal reg reruns)) ;; (let ((newtal (append tal (list hed)))) ;; We should discard hed as it has been expanded into it's items? ;; (loop (car newtal)(cdr newtal) reg reruns)) ;; ) (loop (car tal)(cdr tal) reg reruns)) |
︙ | ︙ |
Modified tests/fullrun/megatest.config from [43480bf9c2] to [2867e47acf].
︙ | ︙ | |||
14 15 16 17 18 19 20 | # Set launchwait to yes to use the old launch run code that waits for the launch process to return before # proceeding. # launchwait yes # If set to "default" the old code is used. Otherwise defaults to 200 or uses # numeric value given. # | | | 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | # Set launchwait to yes to use the old launch run code that waits for the launch process to return before # proceeding. # launchwait yes # If set to "default" the old code is used. Otherwise defaults to 200 or uses # numeric value given. # runqueue 2 # It is possible (but not recommended) to override the rsync command used # to populate the test directories. For test development the following # example can be useful # # testcopycmd cp --remove-destination -rsv TEST_SRC_PATH/. TEST_TARG_PATH/. >> TEST_TARG_PATH/mt_launch.log 2>> TEST_TARG_PATH/mt_launch.log |
︙ | ︙ |