correct macro

8 years ago · 763bb5165e
parent 10730b5bfd
commit 763bb5165e
1 changed files with 2 additions and 1 deletions
--- a/beautiful-racket-demo/stackerizer-demo/stackerizer.rkt
+++ b/beautiful-racket-demo/stackerizer-demo/stackerizer.rkt
@ -3,7 +3,8 @@

 (define-macro (stackerizer-mb EXPR ...)
  #'(#%module-begin
-     (for-each displayln (reverse (flatten EXPR ...)))))
+     (for-each displayln
+               (reverse (flatten (list EXPR ...))))))
 (provide (rename-out [stackerizer-mb #%module-begin]))

 (define-macro (define-ops OP ...)