From 8cd61c00de00728759d0362a60dbca8d23e4d8dc Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 28 May 2019 22:14:53 -0400
Subject: Both the old JVM interop and the new JVM interop use the same syntax
 for array types.

---
 lux-js/source/program.lux | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'lux-js/source')

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)
-- 
cgit v1.2.3