6 lines
200 B
Scheme
6 lines
200 B
Scheme
(require (planet "test.ss" ("schematics" "schemeunit.plt" 1 1)))
|
|
(require (planet "text-ui.ss" ("schematics" "schemeunit.plt" 1 1)))
|
|
(require "all-srfi-40-tests.ss")
|
|
|
|
(test/text-ui all-srfi-40-tests)
|