From 085c9a6ef151531cb01b842ed2f4366a49b78367 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 8 Sep 2021 23:14:59 -0400
Subject: De-bracing | part 2

---
 stdlib/source/test/lux.lux | 26 +++++++++++++-------------
 1 file changed, 13 insertions(+), 13 deletions(-)

(limited to 'stdlib/source/test/lux.lux')

diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux
index 238bf666d..d40709cf6 100644
--- a/stdlib/source/test/lux.lux
+++ b/stdlib/source/test/lux.lux
@@ -1,5 +1,5 @@
-(.with_expansions [<target>' (.for {"{old}" (.as_is ["[1]/[0]" jvm])
-                                    "JVM" (.as_is ["[1]/[0]" jvm])}
+(.with_expansions [<target>' (.for ["{old}" (.as_is ["[1]/[0]" jvm])
+                                    "JVM" (.as_is ["[1]/[0]" jvm])]
                                    (.as_is))
                    <target> <target>']
   (.module:
@@ -78,10 +78,10 @@
 (def: sub_tests
   Test
   (with_expansions [... TODO: Update & expand tests for this
-                    <target> (for {@.jvm (~~ (as_is /target/jvm.test))
-                                   @.old (~~ (as_is /target/jvm.test))}
+                    <target> (for [@.jvm (~~ (as_is /target/jvm.test))
+                                   @.old (~~ (as_is /target/jvm.test))]
                                   (~~ (as_is)))
-                    <extension> (for {@.old (~~ (as_is))}
+                    <extension> (for [@.old (~~ (as_is))]
                                      (~~ (as_is /extension.test)))]
     (`` (_.in_parallel (list /abstract.test
                              /control.test
@@ -443,7 +443,7 @@
                    (#.Right [lux (list)])))]
     (do random.monad
       [expected random.nat]
-      (with_expansions [<found_crosshair?> (for {@.old (~~ (as_is))}
+      (with_expansions [<found_crosshair?> (for [@.old (~~ (as_is))]
                                                 (_.cover [/.Source]
                                                          (..found_crosshair?)))]
         (`` ($_ _.and
@@ -807,16 +807,16 @@
                                 (~~ (/.comment dummy))))))
         (_.cover [/.for]
                  (and (n.= expected
-                           (/.for {"fake host" dummy}
+                           (/.for ["fake host" dummy]
                                   expected))
                       (n.= expected
-                           (/.for {@.old expected
+                           (/.for [@.old expected
                                    @.jvm expected
                                    @.js expected
                                    @.python expected
                                    @.lua expected
                                    @.ruby expected
-                                   @.php expected}
+                                   @.php expected]
                                   dummy))))
         )))
 
@@ -1109,7 +1109,7 @@
                     (bit\= /.private /.local)))
       ))
 
-(for {@.old (as_is)}
+(for [@.old (as_is)]
      (as_is (syntax: (for_bindings|test [fn/0 <code>.local_identifier
                                          var/0 <code>.local_identifier
                                          let/0 <code>.local_identifier
@@ -1193,7 +1193,7 @@
   Test
   (<| (_.covering /._)
       (with_expansions
-        [<for_bindings> (for {@.old (~~ (as_is))}
+        [<for_bindings> (for [@.old (~~ (as_is))]
                              (~~ (as_is ..for_bindings)))]
         (`` ($_ _.and
                 ..for_bit
@@ -1224,12 +1224,12 @@
                 )))))
 
 (program: args
-  (let [times (for {@.old 100
+  (let [times (for [@.old 100
                     @.jvm 100
                     @.js 10
                     @.python 1
                     @.lua 1
-                    @.ruby 1}
+                    @.ruby 1]
                    100)]
     (<| io.io
         _.run!
-- 
cgit v1.2.3