more plumbing

mattwparas · Dec 17, 2024 · 950264d · 950264d
1 parent 5ebd99b
commit 950264d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/crates/steel-core/src/scheme/kernel.scm b/crates/steel-core/src/scheme/kernel.scm
@@ -358,7 +358,7 @@
   ;; Expand to syntax-rules:
   (define fake-syntax-rules
     `(define-syntax ,gensym-name
-       (syntax-rules ()
+       (syntax-rules ,syntax-case-syntax
          ,cases)))
 
   (define conditions (take-every-other cases))