Skip to content

Commit 4ea27c3

Browse files
committed
fix macroexpand
1 parent c6f63a2 commit 4ea27c3

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

src/clj/cljs/core.clj

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1991,7 +1991,7 @@
19911991
"Argument to macroexpand must be quoted")
19921992
(core/let [form (second quoted)
19931993
env &env]
1994-
(core/loop [form' (ana/macroexpand-1 env form)]
1994+
(core/loop [form form form' (ana/macroexpand-1 env form)]
19951995
(core/if-not (core/identical? form form')
1996-
(recur (ana/macroexpand-1 env form'))
1997-
form'))))
1996+
(recur form' (ana/macroexpand-1 env form'))
1997+
`(quote ~form')))))

0 commit comments

Comments
 (0)