Megatest

Check-in [b71a9aadc7]
Login
☰Home Timeline Files Branches Tags Tickets Wiki Login
Overview
Comment:Fixed silly bug in -list-db-targets
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.55
Files: files | file ages | folders
SHA1: b71a9aadc7fb18f8c63746bd882d50f9f6600734
User & Date: mrwellan on 2014-04-24 17:39:53
Other Links: branch diff | manifest | tags
Context
2014-05-01
22:38
Added incremental save when using refdb edit check-in: 1d18479410 user: matt tags: v1.55
2014-04-24
17:39
Fixed silly bug in -list-db-targets check-in: b71a9aadc7 user: mrwellan tags: v1.55
10:14
Switch Makefile_latest.install to use 4.9.0rc1 from tar. check-in: ba13420a7b user: mrwellan tags: v1.55
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Modified megatest.scm from [7844c4546c] to [3aa4b2f17c].

︙
669
670
671
672
673
674
675
676
677


678
679
680
681
682
683
684

669
670
671
672
673
674
675


676
677
678
679
680
681
682
683
684








-
-
+
+








    (if (setup-for-run)
	(let* ((db       #f)
	       (runpatt  (args:get-arg "-list-runs"))
	       (testpatt (if (args:get-arg "-testpatt") 
			     (args:get-arg "-testpatt") 
			     "%"))
	       (keys     (cdb:remote-run db:get-keys #f))
	       (runsdat  (cdb:remote-run db:get-runs-by-patt #f keys runpatt
					 (common:args-get-target)
	       (runsdat  (cdb:remote-run db:get-runs-by-patt #f keys (if runpatt runpatt "%")
					 (if (args:get-arg "-list-runs")(common:args-get-target) #f)
					 #f #f))
		;; (cdb:remote-run db:get-runs #f runpatt #f #f '()))
	       (runs     (db:get-rows runsdat))
	       (header   (db:get-header runsdat))
	       (db-targets (args:get-arg "-list-db-targets"))
	       (seen     (make-hash-table)))
	  ;; Each run
︙

This page was generated in about 0.108s by Fossil 2.24 [452f8e1ffc] 2024-03-26 15:36:00