diff options
Diffstat (limited to 'test/gerbil.scm')
-rw-r--r-- | test/gerbil.scm | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/test/gerbil.scm b/test/gerbil.scm new file mode 100644 index 0000000..ca730d0 --- /dev/null +++ b/test/gerbil.scm @@ -0,0 +1,21 @@ +(import (scheme base) + (std test)) + +(import (zambyte meta json)) + +(define-syntax test + (syntax-rules () + ((_ name expected actual) + (test-case name (check-output actual expected))))) + +(define-syntax test-assert + (syntax-rules () + ((_ name actual) + (test-case name (check-predicate actual values))))) + +(define-syntax test-not + (syntax-rules () + ((_ name actual) + (test-case name (check-predicate actual not))))) + +(include "run.scm") |