aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/eval.jvm.lux
diff options
context:
space:
mode:
authorEduardo Julian2017-12-02 13:55:48 -0400
committerEduardo Julian2017-12-02 13:55:48 -0400
commit5c4a26c9344898c4fa958946b47b55e1c84818bd (patch)
treefe599294cc3d08ca1995a7cd58a51baa18689944 /new-luxc/source/luxc/lang/translation/eval.jvm.lux
parent1651d847ba70ee36171f3809a25bece325fd5715 (diff)
- "gensym" went back to producing Code, instead of Ident.
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/eval.jvm.lux')
-rw-r--r--new-luxc/source/luxc/lang/translation/eval.jvm.lux2
1 files changed, 1 insertions, 1 deletions
diff --git a/new-luxc/source/luxc/lang/translation/eval.jvm.lux b/new-luxc/source/luxc/lang/translation/eval.jvm.lux
index 2236815ea..9cce16a49 100644
--- a/new-luxc/source/luxc/lang/translation/eval.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/eval.jvm.lux
@@ -25,7 +25,7 @@
(-> $.Inst (Meta Top))
(do macro.Monad<Meta>
[current-module macro.current-module-name
- [_ class-name] (macro.gensym (format current-module "/eval"))
+ class-name (:: @ map %code (macro.gensym (format current-module "/eval")))
#let [store-name (text.replace-all "/" "." class-name)
bytecode ($d.class #$.V1_6
#$.Public $.noneC