generalized `begin-for-syntax'

original commit: d3c56c9f13327d07513f8b6bf7ea0230acb7f489
2011-09-05 16:08:16 -06:00 · 2011-09-05 16:08:16 -06:00 · 74d330956c
commit 74d330956c
parent df9efe2096
1 changed files with 1 additions and 1 deletions
--- a/collects/macro-debugger/model/trace.rkt
+++ b/collects/macro-debugger/model/trace.rkt
@ -152,7 +152,7 @@
     (eval/compile stx)]
    [(define-syntaxes . _)
     (eval/compile stx)]
-    [(define-values-for-syntax . _)
+    [(begin-for-syntax . _)
     (eval/compile stx)]
    [(define-values (id ...) . _)
     (with-syntax ([defvals (stx-car stx)]