From d087b830e9878f83b0443b21829a0df4b8cbcdd4 Mon Sep 17 00:00:00 2001 From: Jeff Bezanson Date: Tue, 21 Jul 2015 10:33:03 -0400 Subject: [PATCH] fix #12075. don't recursively macroexpand into module expressions --- src/julia-syntax.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/julia-syntax.scm b/src/julia-syntax.scm index 8cbae5bbbadf4..fa41c0cd54045 100644 --- a/src/julia-syntax.scm +++ b/src/julia-syntax.scm @@ -3340,8 +3340,7 @@ So far only the second case can actually occur. ((eq? (car e) 'quote) ;; backquote is essentially a built-in macro at the moment (julia-expand-macros (julia-bq-expand (cadr e) 0))) - ((eq? (car e) 'inert) - e) + ((eq? (car e) 'inert) e) ((eq? (car e) 'macrocall) ;; expand macro (let ((form (apply invoke-julia-macro (cadr e) (cddr e)))) @@ -3355,6 +3354,7 @@ So far only the second case can actually occur. (rename-symbolic-labels (julia-expand-macros (resolve-expansion-vars form m)))))) + ((eq? (car e) 'module) e) (else (map julia-expand-macros e))))