Use assoc symbols for keys instead of strings for objects.

Update the test suite to be more compatible with SRFI 64.

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")