diff options
Diffstat (limited to 'test/gerbil.scm')
| -rw-r--r-- | test/gerbil.scm | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/test/gerbil.scm b/test/gerbil.scm index ca730d0..bfd0ddb 100644 --- a/test/gerbil.scm +++ b/test/gerbil.scm @@ -3,19 +3,20 @@ (import (zambyte meta json)) -(define-syntax test +(define-syntax test-equal (syntax-rules () ((_ name expected actual) - (test-case name (check-output actual expected))))) + (test-case name (check-equal? 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))))) +(define suite + (test-suite + "gerbil" + (include "run.scm"))) + +(run-test-suite! suite) -(include "run.scm") |