1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
|
(define-structure posix-core-test (export posix-core-tests)
(open scheme test-suites sort threads
util ; every
posix-files
posix-time
posix-users
posix-i/o
posix-process-data
posix-processes
os-strings)
(files check))
(define-structure regexp-test (export regexp-tests)
(open scheme test-suites
regexps)
(files regexp-check))
(define-structure posix-test (export posix-tests)
(open scheme test-suites
posix-core-test
regexp-test)
(begin
(define-test-suite posix-tests (posix-core-tests regexp-tests))))
|