aboutsummaryrefslogtreecommitdiff
path: root/lux-js/source
diff options
context:
space:
mode:
authorEduardo Julian2019-05-28 22:14:53 -0400
committerEduardo Julian2019-05-28 22:14:53 -0400
commit8cd61c00de00728759d0362a60dbca8d23e4d8dc (patch)
tree4eaf5b75bea6bd84b1db28eb405539213392a588 /lux-js/source
parentf55e513690400cce9e5e17a01a98922d91e086c3 (diff)
Both the old JVM interop and the new JVM interop use the same syntax for array types.
Diffstat (limited to 'lux-js/source')
-rw-r--r--lux-js/source/program.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/lux-js/source/program.lux b/lux-js/source/program.lux
index 1a2bfc8d8..30ab46ced 100644
--- a/lux-js/source/program.lux
+++ b/lux-js/source/program.lux
@@ -55,7 +55,7 @@
(doubleValue [] double))
(import: #long java/util/Arrays
- (#static [t] copyOfRange [(Array t) int int] (Array t)))
+ (#static [t] copyOfRange [[t] int int] [t]))
(import: #long javax/script/ScriptEngine
(eval [java/lang/String] #try #? java/lang/Object))
@@ -72,7 +72,7 @@
(getSlot [int] #? java/lang/Object)
(getMember [java/lang/String] #? java/lang/Object)
(hasMember [java/lang/String] boolean)
- (call [#? java/lang/Object (Array java/lang/Object)] #try java/lang/Object))
+ (call [#? java/lang/Object [java/lang/Object]] #try java/lang/Object))
(import: #long jdk/nashorn/api/scripting/AbstractJSObject)
@@ -132,7 +132,7 @@
(isFunction) boolean
#1)
(jdk/nashorn/api/scripting/AbstractJSObject
- (call {this java/lang/Object} {args (Array java/lang/Object)}) java/lang/Object
+ (call {this java/lang/Object} {args [java/lang/Object]}) java/lang/Object
(debug.inspect js-object))
))
@@ -144,7 +144,7 @@
(isFunction) boolean
#1)
(jdk/nashorn/api/scripting/AbstractJSObject
- (call {this java/lang/Object} {args (Array java/lang/Object)}) java/lang/Object
+ (call {this java/lang/Object} {args [java/lang/Object]}) java/lang/Object
(|> (java/util/Arrays::copyOfRange value
(|> args (array.read 0) maybe.assume (:coerce Int))
(.int (array.size value)))
@@ -156,7 +156,7 @@
(-> (Array java/lang/Object) jdk/nashorn/api/scripting/JSObject)
(let [js-object (: (-> java/lang/Object jdk/nashorn/api/scripting/JSObject)
(function (_ sub-value)
- (<| (case (host.check (Array java/lang/Object) sub-value)
+ (<| (case (host.check [java/lang/Object] sub-value)
(#.Some sub-value)
(|> sub-value (:coerce (Array java/lang/Object)) js-structure)
#.None)