Megatest

Check-in [9ff8cae0bf]
Login
Overview
Comment:adding my changes to runs.scm -- note: not in a completely runnable state
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | debug_chained_waiton | v1.60_defunct
Files: files | file ages | folders
SHA1: 9ff8cae0bf0b672108e88a0229a001b9dac83270
User & Date: bjbarcla on 2016-04-18 15:41:37
Other Links: branch diff | manifest | tags
Context
2016-04-18
18:47
ceaned up dfs.scm a bit Closed-Leaf check-in: a482e0ffbd user: bjbarcla tags: debug_chained_waiton, v1.60_defunct
15:41
adding my changes to runs.scm -- note: not in a completely runnable state check-in: 9ff8cae0bf user: bjbarcla tags: debug_chained_waiton, v1.60_defunct
15:30
adding dfs poc for solving chained-waiton check-in: 985f2017bf user: bjbarcla tags: debug_chained_waiton, v1.60_defunct
Changes

Modified runs.scm from [8f7cfd9962] to [5411b91e62].

498
499
500
501
502
503
504
505
506


507
508
509
510
511
512
513
498
499
500
501
502
503
504


505
506
507
508
509
510
511
512
513







-
-
+
+







                                (cdr filtered-remtests)
                                (runs:toposort (cdr filtered-remtests) all-tests-registry))))
                      ;;(set! remtests (runs:toposort remtests all-tests-registry))
                      ;;(loop (car remtests)(cdr remtests))
                      (loop processed new-hed new-tal)
                    )))))))


    
    ;; above: populate test-records hash
    ;; below - manage call to run-tests-queue
    (counter-reset 'rtloop)
    (debug:print-info 0 "BB: Finished elaboration of waiton dependencies (maybe?)")
    (if (not (null? required-tests))
	(debug:print-info 0 "BB Adding \"" (string-intersperse required-tests " ") "\" to the run queue")) ; BB changed 1 to 0
    ;; NOTE: these are all parent tests, items are not expanded yet.
    (debug:print-info 0 "BB test-records=" (hash-table->alist test-records)) ; BB: changed 4 to 0
    (let ((reglen (configf:lookup *configdat* "setup" "runqueue")))