Use assoc symbols for keys instead of strings for objects.

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

1 files changed, 3 insertions, 16 deletions

diff --git a/test/gauche.scm b/test/gauche.scm
index 1388b1e..929ea6a 100644
--- a/test/gauche.scm
+++ b/test/gauche.scm
@@ -1,21 +1,8 @@
 (import (scheme base)
-	(prefix (gauche test) g:))
+	(srfi 64))
 
 (import (zambyte meta json))
 
-(define-syntax test
-  (syntax-rules ()
-    ((_ name expected actual)
-     (g:test name expected (lambda () actual) equal?))))
-
-(define-syntax test-assert
-  (syntax-rules ()
-    ((_ name expr)
-     (g:test name #t (lambda () expr) eq?))))
-
-(define-syntax test-not
-  (syntax-rules ()
-    ((_ name expr)
-     (g:test name #f (lambda () expr) eq?))))
-
+(test-begin "gauche")
 (include "run.scm")
+(test-end "gauche")