From: Chris Hanson <org/chris-hanson/cph>
Date: Fri, 2 Feb 2018 05:54:55 +0000 (-0800)
Subject: Fix test broken by earlier change.
X-Git-Tag: mit-scheme-pucked-x11-0.3.1~7^2~279
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=4bf426eef562d245b13274ad6df4e6f260591040;p=mit-scheme.git

Fix test broken by earlier change.
---

diff --git a/tests/runtime/test-syntax-rename.scm b/tests/runtime/test-syntax-rename.scm
index 600f3f454..a8ad0aeba 100644
--- a/tests/runtime/test-syntax-rename.scm
+++ b/tests/runtime/test-syntax-rename.scm
@@ -37,7 +37,7 @@ USA.
      (syntax-check '(keyword identifier) form)
      (let* ((raw (cadr form))
 	    (closed (close-syntax raw use-env)))
-       `(define-syntax inner
+       `(define-syntax ,(close-syntax 'inner use-env)
 	  (sc-macro-transformer
 	   (lambda (form use-env)
 	     (syntax-check '(keyword) form)