diff options
Diffstat (limited to '')
| -rw-r--r-- | new-luxc/source/luxc/lang/translation/jvm/runtime.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/new-luxc/source/luxc/lang/translation/jvm/runtime.lux b/new-luxc/source/luxc/lang/translation/jvm/runtime.lux index 755ae7a3b..0f3a89faf 100644 --- a/new-luxc/source/luxc/lang/translation/jvm/runtime.lux +++ b/new-luxc/source/luxc/lang/translation/jvm/runtime.lux @@ -4,12 +4,12 @@ [monad (#+ do)]] [data [collection - ["." list ("#/." functor)]]] + ["." list ("#@." functor)]]] ["." math] [target [jvm - ["." descriptor (#+ Descriptor)] - ["$t" type]]] + [type + ["." descriptor (#+ Descriptor)]]]] [tool [compiler [arity (#+ Arity)] @@ -329,10 +329,10 @@ (def: translate-function (Operation ByteCode) (let [applyI (|> (list.n/range 2 num-apply-variants) - (list/map (function (_ arity) + (list@map (function (_ arity) ($d.method #$.Public $.noneM apply-method (apply-signature arity) (let [preI (|> (list.n/range 0 (dec arity)) - (list/map _.ALOAD) + (list@map _.ALOAD) _.fuse)] (|>> preI (_.INVOKEVIRTUAL //.$Function apply-method (apply-signature (dec arity)) #0) |