From 6368fb067e244349265e9fdc4a7735e069a6a40a Mon Sep 17 00:00:00 2001
From: Peter Bex <peter@more-magic.net>
Date: Sat, 28 Mar 2020 20:49:55 +0100
Subject: Don't use keywords as identifiers in macro in tests

This breaks in newer CHICKEN versions.
---
 tests/run.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'tests/run.scm')

diff --git a/tests/run.scm b/tests/run.scm
index 80cf799..c370cbe 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 "<no error thrown>")
                                       ((?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