From 77301f3a456c015daa9d8f9aa3d80fd4e45f8e7e Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 8 Sep 2021 21:44:06 -0400
Subject: De-bracing part 0

---
 lux-lua/source/program.lux | 32 ++++++++++++++------------------
 1 file changed, 14 insertions(+), 18 deletions(-)

(limited to 'lux-lua')

diff --git a/lux-lua/source/program.lux b/lux-lua/source/program.lux
index a16198b06..e21b86260 100644
--- a/lux-lua/source/program.lux
+++ b/lux-lua/source/program.lux
@@ -180,19 +180,19 @@
                                           []
                                           ... Methods
                                           (program/StructureValue
-                                           [] (getValue self) java/lang/Object
+                                           [] (getValue self []) java/lang/Object
                                            (:as java/lang/Object value))
 
                                           (net/sandius/rembulan/impl/DefaultTable
-                                           [] (rawlen self) long
+                                           [] (rawlen self []) long
                                            (|> value array.size (:as java/lang/Long)))
 
                                           (net/sandius/rembulan/impl/DefaultTable
-                                           [] (rawget self {idx long}) java/lang/Object
+                                           [] (rawget self [idx long]) java/lang/Object
                                            (|> value (array.read! (|> idx (:as Nat) --)) maybe.trusted re_wrap))
 
                                           (net/sandius/rembulan/impl/DefaultTable
-                                           [] (rawget self {field java/lang/Object}) java/lang/Object
+                                           [] (rawget self [field java/lang/Object]) java/lang/Object
                                            (case (ffi.check net/sandius/rembulan/ByteString field)
                                              (#.Some field)
                                              (case (net/sandius/rembulan/ByteString::decode field)
@@ -651,16 +651,14 @@
                                    []
                                    ... Methods
                                    (net/sandius/rembulan/runtime/LuaFunction
-                                    [] (invoke self
-                                               {% net/sandius/rembulan/runtime/ExecutionContext})
+                                    [] (invoke self [% net/sandius/rembulan/runtime/ExecutionContext])
                                     void
                                     (<| (..return %)
                                         (host_phase partial_application phase)))
 
                                    (net/sandius/rembulan/runtime/LuaFunction
-                                    [] (invoke self
-                                               {% net/sandius/rembulan/runtime/ExecutionContext}
-                                               {input/0 java/lang/Object})
+                                    [] (invoke self [% net/sandius/rembulan/runtime/ExecutionContext
+                                                     input/0 java/lang/Object])
                                     void
                                     (<| (..return %)
                                         try.trusted
@@ -683,10 +681,9 @@
                                             (exception.except ..invaid_phase_application [partial_application 2])))))
 
                                    (net/sandius/rembulan/runtime/LuaFunction
-                                    [] (invoke self
-                                               {% net/sandius/rembulan/runtime/ExecutionContext}
-                                               {input/0 java/lang/Object}
-                                               {input/1 java/lang/Object})
+                                    [] (invoke self [% net/sandius/rembulan/runtime/ExecutionContext
+                                                     input/0 java/lang/Object
+                                                     input/1 java/lang/Object])
                                     void
                                     (<| (..return %)
                                         try.trusted
@@ -707,11 +704,10 @@
                                             (exception.except ..invaid_phase_application [partial_application 2])))))
 
                                    (net/sandius/rembulan/runtime/LuaFunction
-                                    [] (invoke self
-                                               {% net/sandius/rembulan/runtime/ExecutionContext}
-                                               {input/0 java/lang/Object}
-                                               {input/1 java/lang/Object}
-                                               {input/2 java/lang/Object})
+                                    [] (invoke self [% net/sandius/rembulan/runtime/ExecutionContext
+                                                     input/0 java/lang/Object
+                                                     input/1 java/lang/Object
+                                                     input/2 java/lang/Object])
                                     void
                                     (<| (..return %)
                                         try.trusted
-- 
cgit v1.2.3