Browse files

macro expansion still needs first-transform check

  • Loading branch information...
digego committed Aug 26, 2012
1 parent 035e334 commit 01e2a215297c4d4721c5b3fc70411db2186dcef7
Showing with 1 addition and 1 deletion.
  1. +1 −1 runtime/llvmti.xtm
@@ -608,7 +608,7 @@
(not (eq? 'dotimes (car ast)))
(defined? (car ast))
(macro? (eval (car ast))))
- (macro-expand ast))
+ (impc:ti:first-transform (macro-expand ast) 'inbody?))
(else (cons ;(impc:ti:first-transform (car ast) inbody?)
(impc:ti:first-transform (car ast) #t)
;(impc:ti:first-transform (cdr ast) inbody?)))))

0 comments on commit 01e2a21

Please sign in to comment.