aboutsummaryrefslogtreecommitdiff
path: root/lux-lua
diff options
context:
space:
mode:
Diffstat (limited to 'lux-lua')
-rw-r--r--lux-lua/source/program.lux7
1 files changed, 2 insertions, 5 deletions
diff --git a/lux-lua/source/program.lux b/lux-lua/source/program.lux
index 13d6862b0..2851fec7d 100644
--- a/lux-lua/source/program.lux
+++ b/lux-lua/source/program.lux
@@ -104,10 +104,7 @@
(import: #long net/sandius/rembulan/exec/DirectCallExecutor
(#static newExecutor [] net/sandius/rembulan/exec/DirectCallExecutor)
(schedulingContextFactory [] net/sandius/rembulan/runtime/SchedulingContextFactory)
- (call [net/sandius/rembulan/StateContext
- java/lang/Object
- (Array java/lang/Object)]
- #try (Array java/lang/Object)))
+ (call [net/sandius/rembulan/StateContext java/lang/Object [java/lang/Object]] #try [java/lang/Object]))
(exception: (unknown-kind-of-object {object java/lang/Object})
(exception.report
@@ -127,7 +124,7 @@
(def: (lux-structure value)
(-> (Array java/lang/Object) program/StructureValue)
(let [re-wrap (function (_ unwrapped)
- (case (host.check (Array java/lang/Object) unwrapped)
+ (case (host.check [java/lang/Object] unwrapped)
(#.Some sub-value)
(|> sub-value (:coerce (Array java/lang/Object)) lux-structure (:coerce java/lang/Object))