31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
(declare (uses configf))
(declare (uses db))
(declare (uses rmtmod))
(declare (uses ezsteps))
;; (declare (uses dbmod))
(declare (uses dbfile))
(declare (uses mtargs))
(use regex regex-case base64 sqlite3 srfi-18 directory-utils posix posix-extras z3
call-with-environment-variables csv hostinfo
typed-records pathname-expand matchable)
(import (prefix base64 base64:)
(prefix sqlite3 sqlite3:)
|
>
>
|
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
|
(declare (uses configf))
(declare (uses db))
(declare (uses rmtmod))
(declare (uses ezsteps))
;; (declare (uses dbmod))
(declare (uses dbfile))
(declare (uses mtargs))
(declare (uses mtmod))
(declare (uses megatestmod))
(use regex regex-case base64 sqlite3 srfi-18 directory-utils posix posix-extras z3
call-with-environment-variables csv hostinfo
typed-records pathname-expand matchable)
(import (prefix base64 base64:)
(prefix sqlite3 sqlite3:)
|
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
(import commonmod
processmod
configfmod
rmtmod
debugprint
;; dbmod
dbfile)
;;======================================================================
;; ezsteps
;;======================================================================
;; ezsteps were going to be coded as
;; stepname[,predstep1,predstep2 ...] [{VAR1=first,second,third}] command to execute
|
|
>
>
>
|
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
|
(import commonmod
processmod
configfmod
rmtmod
debugprint
;; dbmod
dbfile
mtmod
megatestmod
)
;;======================================================================
;; ezsteps
;;======================================================================
;; ezsteps were going to be coded as
;; stepname[,predstep1,predstep2 ...] [{VAR1=first,second,third}] command to execute
|