De-bracing part 0

3 files changed, 42 insertions, 35 deletions

diff --git a/stdlib/source/test/lux/control/concurrency/actor.lux b/stdlib/source/test/lux/control/concurrency/actor.lux
index 012a9f796..27b13bba4 100644
--- a/stdlib/source/test/lux/control/concurrency/actor.lux
+++ b/stdlib/source/test/lux/control/concurrency/actor.lux
@@ -175,8 +175,8 @@
             (in (do async.monad
                   [verdict (async.future
                             (do io.monad
-                              [anonymous (/.actor {Nat
-                                                   initial_state}
+                              [anonymous (/.actor [Nat
+                                                   initial_state]
                                                   ((on_mail message state self)
                                                    (message (++ state) self)))
                                sent/++? (/.mail! ++! anonymous)
@@ -207,7 +207,7 @@
               (in (do async.monad
                     [agent (async.future
                             (do [! io.monad]
-                              [agent (/.actor {Nat 0})
+                              [agent (/.actor [Nat 0])
                                _ (/.observe! (function (_ event stop)
                                                (function (_ events_seen self)
                                                  (async.future
diff --git a/stdlib/source/test/lux/ffi.jvm.lux b/stdlib/source/test/lux/ffi.jvm.lux
index 606bd8a23..431e72641 100644
--- a/stdlib/source/test/lux/ffi.jvm.lux
+++ b/stdlib/source/test/lux/ffi.jvm.lux
@@ -267,7 +267,7 @@
      .let [object/0 (/.object [] [test/TestInterface0]
                       []
                       (test/TestInterface0
-                       [] (actual0 self)
+                       [] (actual0 self [])
                        java/lang/Long
                        (:as java/lang/Long
                             expected)))
@@ -278,7 +278,7 @@
            object/1 (/.object [] [test/TestInterface1]
                       []
                       (test/TestInterface1
-                       [] (actual1 self {throw? java/lang/Boolean})
+                       [] (actual1 self [throw? java/lang/Boolean])
                        java/lang/Long
                        "throws" [java/lang/Throwable]
                        (if (:as Bit throw?)
@@ -303,7 +303,7 @@
            object/2 (/.object [] [test/TestInterface2]
                       []
                       (test/TestInterface2
-                       [a] (actual2 self {input a})
+                       [a] (actual2 self [input a])
                        a
                        input))
            example/2!
@@ -313,7 +313,7 @@
            object/3 (/.object [] [(test/TestInterface3 java/lang/Long)]
                       []
                       ((test/TestInterface3 a)
-                       [] (actual3 self)
+                       [] (actual3 self [])
                        a
                        (:as java/lang/Long
                             expected)))
@@ -326,7 +326,9 @@
                  object/4 (/.object [] [test/TestInterface4]
                             []
                             (test/TestInterface4
-                             [] (actual4 self {actual_left long} {actual_right long} {_ long})
+                             [] (actual4 self [actual_left long
+                                               actual_right long
+                                               _ long])
                              long
                              (:as java/lang/Long
                                   (i.+ (:as Int actual_left)
@@ -344,10 +346,11 @@
   ... Fields
   ("private" value java/lang/Long)
   ... Constructors
-  ("public" [] (new self {value java/lang/Long}) []
+  ("public" [] (new self [value java/lang/Long]) []
    (:= ::value value))
   ... Methods
-  (test/TestInterface0 [] (actual0 self) java/lang/Long
+  (test/TestInterface0 [] (actual0 self [])
+                       java/lang/Long
                        ::value))
 
 (/.import: test/TestClass0
@@ -358,10 +361,12 @@
   ... Fields
   ("private" value java/lang/Long)
   ... Constructors
-  ("public" [] (new self {value java/lang/Long}) []
+  ("public" [] (new self [value java/lang/Long]) []
    (:= ::value value))
   ... Methods
-  (test/TestInterface1 [] (actual1 self {throw? java/lang/Boolean}) java/lang/Long "throws" [java/lang/Throwable]
+  (test/TestInterface1 [] (actual1 self [throw? java/lang/Boolean])
+                       java/lang/Long
+                       "throws" [java/lang/Throwable]
                        (if (:as Bit throw?)
                          (panic! "YOLO")
                          ::value)))
@@ -372,11 +377,11 @@
 
 (/.class: "final" test/TestClass2 [test/TestInterface2]
   ... Constructors
-  ("public" [] (new self) []
+  ("public" [] (new self []) []
    [])
   ... Methods
   (test/TestInterface2
-   [a] (actual2 self {input a})
+   [a] (actual2 self [input a])
    a
    input))
 
@@ -388,11 +393,11 @@
   ... Fields
   ("private" value a)
   ... Constructors
-  ("public" [] (new self {value a}) []
+  ("public" [] (new self [value a]) []
    (:= ::value value))
   ... Methods
   ((test/TestInterface3 a)
-   [] (actual3 self)
+   [] (actual3 self [])
    a
    ::value))
 
@@ -402,10 +407,10 @@
 
 (/.class: "final" test/TestClass4 []
   ... Constructors
-  ("public" [] (new self) []
+  ("public" [] (new self []) []
    [])
   ... Methods
-  ("public" (actual4 self {value java/lang/Long}) java/lang/Long
+  ("public" (actual4 self [value java/lang/Long]) java/lang/Long
    value))
 
 (/.import: test/TestClass4
@@ -415,10 +420,10 @@
 
 (/.class: "final" test/TestClass5 []
   ... Constructors
-  ("public" [] (new self) []
+  ("public" [] (new self []) []
    [])
   ... Methods
-  ("public" "static" (actual5 {value java/lang/Long})
+  ("public" "static" (actual5 [value java/lang/Long])
    java/lang/Long
    value))
 
@@ -428,10 +433,10 @@
 
 (/.class: "abstract" test/TestClass6 []
   ... Constructors
-  ("public" [] (new self) []
+  ("public" [] (new self []) []
    [])
   ... Methods
-  ("public" "abstract" (actual6 {value java/lang/Long})
+  ("public" "abstract" (actual6 [value java/lang/Long])
    java/lang/Long))
 
 (/.import: test/TestClass6
@@ -440,11 +445,11 @@
 
 (/.class: "final" test/TestClass7 test/TestClass6 []
   ... Constructors
-  ("public" [] (new self) []
+  ("public" [] (new self []) []
    [])
   ... Methods
   (test/TestClass6
-   [] (actual6 self {input java/lang/Long})
+   [] (actual6 self [input java/lang/Long])
    java/lang/Long
    input))
 
@@ -454,11 +459,13 @@
 
 (/.class: "final" test/TestClass8 [test/TestInterface4]
   ... Constructors
-  ("public" [] (new self) []
+  ("public" [] (new self []) []
    [])
   ... Methods
   (test/TestInterface4
-   [] (actual4 self {actual_left long} {actual_right long} {_ long})
+   [] (actual4 self [actual_left long
+                     actual_right long
+                     _ long])
    long
    (:as java/lang/Long
         (i.+ (:as Int actual_left)
@@ -472,12 +479,12 @@
   ... Fields
   ("private" value9 a)
   ... Constructors
-  ("public" [] (new self {value a}) []
+  ("public" [] (new self [value a]) []
    (:= ::value9 value))
   ... Methods
-  ("public" (set_actual9 self {value a}) void
+  ("public" (set_actual9 self [value a]) void
    (:= ::value9 value))
-  ("public" (get_actual9 self) a
+  ("public" (get_actual9 self []) a
    ::value9))
 
 (/.import: (test/TestClass9 a)
diff --git a/stdlib/source/test/lux/ffi.old.lux b/stdlib/source/test/lux/ffi.old.lux
index 56f97a962..27d18d002 100644
--- a/stdlib/source/test/lux/ffi.old.lux
+++ b/stdlib/source/test/lux/ffi.old.lux
@@ -43,11 +43,11 @@
      (:= ::increase increase)
      (:= ::counter counter)
      []))
-  ("public" (currentC self) java/lang/Long
+  ("public" (currentC self []) java/lang/Long
    ::counter)
-  ("public" (upC self) void
+  ("public" (upC self []) void
    (:= ::counter (i.+ ::increase ::counter)))
-  ("public" (downC self) void
+  ("public" (downC self []) void
    (:= ::counter (i.- ::increase ::counter))))
 
 (/.import: (test/lux/ffi/TestClass a)
@@ -73,15 +73,15 @@
   (/.object [] [test/lux/ffi/TestInterface]
     []
     (test/lux/ffi/TestInterface
-     [] (current self)
+     [] (current self [])
      java/lang/Long
      counter)
     (test/lux/ffi/TestInterface
-     [] (up self)
+     [] (up self [])
      test/lux/ffi/TestInterface
      (test_object increase (i.+ increase counter)))
     (test/lux/ffi/TestInterface
-     [] (down self)
+     [] (down self [])
      test/lux/ffi/TestInterface
      (test_object increase (i.- increase counter)))))