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-php/source/program.lux | 21 +++++++++------------
 1 file changed, 9 insertions(+), 12 deletions(-)

(limited to 'lux-php/source')

diff --git a/lux-php/source/program.lux b/lux-php/source/program.lux
index abdfde3a5..1696206c6 100644
--- a/lux-php/source/program.lux
+++ b/lux-php/source/program.lux
@@ -226,21 +226,20 @@
   (-> (Array java/lang/Object) php/runtime/Memory)
   (`` (ffi.object [] php/runtime/Memory
         [program/StructureValue]
-        [{php/runtime/Memory$Type php/runtime/Memory$Type::ARRAY}]
+        [php/runtime/Memory$Type php/runtime/Memory$Type::ARRAY]
         ... Methods
         (program/StructureValue
-         [] (getValue self) java/lang/Object
+         [] (getValue self []) java/lang/Object
          (:expected value))
 
         (php/runtime/Memory
-         [] (toString self)
+         [] (toString self [])
          java/lang/String
          (debug.inspect value))
 
         (php/runtime/Memory
-         [] (valueOfIndex self
-                          {trace php/runtime/env/TraceInfo}
-                          {index php/runtime/Memory})
+         [] (valueOfIndex self [trace php/runtime/env/TraceInfo
+                                index php/runtime/Memory])
          php/runtime/Memory
          (`` (<| (~~ (template [<class> <method> <extractor>]
                        [(case (ffi.check <class> index)
@@ -262,9 +261,8 @@
                  (undefined))))
 
         (php/runtime/Memory
-         [] (valueOfIndex self
-                          {trace php/runtime/env/TraceInfo}
-                          {index long})
+         [] (valueOfIndex self [trace php/runtime/env/TraceInfo
+                                index long])
          php/runtime/Memory
          (|> value
              (array.read! index)
@@ -272,9 +270,8 @@
              (..value_wrapper lux_structure)))
 
         (php/runtime/Memory
-         [] (valueOfIndex self
-                          {trace php/runtime/env/TraceInfo}
-                          {index java/lang/String})
+         [] (valueOfIndex self [trace php/runtime/env/TraceInfo
+                                index java/lang/String])
          php/runtime/Memory
          (case (:as Text index)
            (^ (static runtime.variant_tag_field))
-- 
cgit v1.2.3