aboutsummaryrefslogtreecommitdiff
path: root/lux-jvm/source/luxc
diff options
context:
space:
mode:
Diffstat (limited to 'lux-jvm/source/luxc')
-rw-r--r--lux-jvm/source/luxc/lang/translation/jvm.lux3
-rw-r--r--lux-jvm/source/luxc/lang/translation/jvm/runtime.lux6
2 files changed, 6 insertions, 3 deletions
diff --git a/lux-jvm/source/luxc/lang/translation/jvm.lux b/lux-jvm/source/luxc/lang/translation/jvm.lux
index 7642a6952..0d4f493bb 100644
--- a/lux-jvm/source/luxc/lang/translation/jvm.lux
+++ b/lux-jvm/source/luxc/lang/translation/jvm.lux
@@ -200,4 +200,5 @@
(type.class (..class_name [0 0]) (list)))
(def: .public $Function
- (type.class (..class_name [0 1]) (list)))
+ (type.class "library.lux.Function" ... (..class_name [0 1])
+ (list)))
diff --git a/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux b/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux
index 6058ba138..dc2cb5053 100644
--- a/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux
+++ b/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux
@@ -408,11 +408,13 @@
(Operation [Registry Output])
(do phase.monad
[runtime_payload ..translate_runtime
- function_payload ..translate_function]
+ ... function_payload ..translate_function
+ ]
(in [(|> artifact.empty
artifact.resource
product.right
artifact.resource
product.right)
(sequence.sequence runtime_payload
- function_payload)])))
+ ... function_payload
+ )])))