aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/reference.jvm.lux
diff options
context:
space:
mode:
authorEduardo Julian2017-11-09 14:19:54 -0400
committerEduardo Julian2017-11-09 14:19:54 -0400
commit63624fd6b7f9f2563898655472025020483d398f (patch)
tree8c3f2f3db00203621c86c07699ade7011918705c /new-luxc/source/luxc/lang/translation/reference.jvm.lux
parent0cb55507c100f6817225e644c2d19e73940edad6 (diff)
- Fixed the tests.
- Fixed a few bugs. - Can now translate recursion.
Diffstat (limited to '')
-rw-r--r--new-luxc/source/luxc/lang/translation/reference.jvm.lux2
1 files changed, 1 insertions, 1 deletions
diff --git a/new-luxc/source/luxc/lang/translation/reference.jvm.lux b/new-luxc/source/luxc/lang/translation/reference.jvm.lux
index c9243cae3..3e835f8e1 100644
--- a/new-luxc/source/luxc/lang/translation/reference.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/reference.jvm.lux
@@ -19,7 +19,7 @@
(do meta;Monad<Meta>
[function-class hostL;context]
(wrap (|>. ($i;ALOAD +0)
- ($i;GETFIELD (&;normalize-name function-class)
+ ($i;GETFIELD function-class
(|> variable i.inc (i.* -1) int-to-nat functionT;captured)
commonT;$Object)))))