diff --git a/crates/steel-core/src/scheme/kernel.scm b/crates/steel-core/src/scheme/kernel.scm
index c45adde40..2c2691aef 100644
--- 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))