126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
|
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
|
-
-
+
+
-
+
|
testsmod
subrunmod
archivemod
fsmod
)
(include "common_records.scm")
(include "key_records.scm")
(include "db_records.scm")
;; (include "key_records.scm")
;; (include "db_records.scm")
(include "run_records.scm")
(include "test_records.scm")
;; (include "test_records.scm")
;; use this struct to facilitate refactoring
;;
(defstruct runs:dat
reglen regfull
runname max-concurrent-jobs run-id
|