From 41d734f1c09581b16ae3bf97a67482d1ee37557c Mon Sep 17 00:00:00 2001 From: Peter Bex Date: Sun, 5 May 2019 11:30:31 +0200 Subject: Fix tests with CHICKEN 5.0.2 Keywords can't be (ab)used as identifier anymore, so we can't bind expression: with let-syntax. Instead, simply use the plain symbol. --- tests/run.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tests/run.scm b/tests/run.scm index 9842bc5..d97f15d 100644 --- a/tests/run.scm +++ b/tests/run.scm @@ -10,13 +10,13 @@ (define-syntax test-error* (syntax-rules () ((_ ?msg (?error-type ...) ?expr) - (let-syntax ((expression: + (let-syntax ((expression (syntax-rules () ((_ ?expr) (condition-case (begin ?expr "") ((?error-type ...) '(?error-type ...)) (exn () (##sys#slot exn 1))))))) - (test ?msg '(?error-type ...) (expression: ?expr)))) + (test ?msg '(?error-type ...) (expression ?expr)))) ((_ ?msg ?error-type ?expr) (test-error* ?msg (?error-type) ?expr)) ((_ ?error-type ?expr) -- cgit v1.2.3