aboutsummaryrefslogtreecommitdiff
path: root/lux-jvm/source/luxc/lang/translation/jvm.lux
diff options
context:
space:
mode:
Diffstat (limited to 'lux-jvm/source/luxc/lang/translation/jvm.lux')
-rw-r--r--lux-jvm/source/luxc/lang/translation/jvm.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/lux-jvm/source/luxc/lang/translation/jvm.lux b/lux-jvm/source/luxc/lang/translation/jvm.lux
index a44bc67e3..1da7db420 100644
--- a/lux-jvm/source/luxc/lang/translation/jvm.lux
+++ b/lux-jvm/source/luxc/lang/translation/jvm.lux
@@ -132,7 +132,7 @@
(io.run! (do (try.with io.monad)
[_ (loader.store eval_class bytecode library)
class (loader.load eval_class loader)
- value (\ io.monad in (..class_value eval_class class))]
+ value (# io.monad in (..class_value eval_class class))]
(in [value
[eval_class bytecode]])))))
@@ -140,7 +140,7 @@
(-> Library java/lang/ClassLoader Definition (Try Any))
(io.run! (do (try.with io.monad)
[existing_class? (|> (atom.read! library)
- (\ io.monad each (function (_ library)
+ (# io.monad each (function (_ library)
(dictionary.key? library class_name)))
(try.lifted io.monad)
(: (IO (Try Bit))))
@@ -165,7 +165,7 @@
(: Host
(implementation
(def: (evaluate! context valueI)
- (\ try.monad each product.left
+ (# try.monad each product.left
(..evaluate! library loader context valueI)))
(def: execute!
@@ -188,7 +188,7 @@
custom)]
_ (loader.store class_name bytecode library)
class (loader.load class_name loader)]
- (\ io.monad in (..class_value class_name class)))))))])))
+ (# io.monad in (..class_value class_name class)))))))])))
(def: .public $Variant
(type.array ..$Value))