1
2
3
4
5
6
7
8
9
10
11
12
|
[ezsteps]
listfiles ls
[requirements]
waiton #{scheme (string-intersperse \
(tests:filter-test-names \
(hash-table-keys (tests:get-all *area-dat*)) \
(or (args:get-arg "-runtests") \
(args:get-arg "-testpatt") "")) " ")}
[items]
|
|
|
1
2
3
4
5
6
7
8
9
10
11
12
|
[ezsteps]
listfiles ls
[requirements]
waiton #{ scheme (string-intersperse \
(tests:filter-test-names \
(hash-table-keys (tests:get-all *area-dat*)) \
(or (args:get-arg "-runtests") \
(args:get-arg "-testpatt") "")) " ")}
[items]
|