From 0b17e637d3791d1ca94558429f9deba3a5876166 Mon Sep 17 00:00:00 2001 From: Robby Zambito Date: Tue, 14 Feb 2023 20:33:23 -0500 Subject: Use assoc symbols for keys instead of strings for objects. Update the test suite to be more compatible with SRFI 64. --- test/gauche.scm | 19 +++---------------- 1 file changed, 3 insertions(+), 16 deletions(-) (limited to 'test/gauche.scm') 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") -- cgit