Megatest

Diff
Login

Differences From Artifact [17bee313ac]:

To Artifact [fe39d65d64]:


1192
1193
1194
1195
1196
1197
1198
1199











1200
1201
1202
1203
1204
1205
1206
1192
1193
1194
1195
1196
1197
1198

1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216







-
+
+
+
+
+
+
+
+
+
+
+








;; use bash to expand a glob. Does NOT handle paths with spaces!
;;
(define (common:bash-glob instr)
  (string-split
   (with-input-from-pipe
       (conc "/bin/bash -c \"echo " instr "\"")
     read-line)))
       read-line)))

;;======================================================================
;; Some safety net stuff
;;======================================================================

;; return input if it is a list or return null
(define (common:list-or-null inlst #!optional (ovrd #f))
  (if (list? inlst)
      inlst
      (or ovrd '())))
  
;;======================================================================
;; T A R G E T S  ,   S T A T E ,   S T A T U S ,   
;;                    R U N N A M E    A N D   T E S T P A T T
;;======================================================================

;; (map print (map car (hash-table->alist (read-config "runconfigs.config" #f #t))))