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

---
 lux-python/source/program.lux | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

(limited to 'lux-python')

diff --git a/lux-python/source/program.lux b/lux-python/source/program.lux
index fb8c39e8e..afb244311 100644
--- a/lux-python/source/program.lux
+++ b/lux-python/source/program.lux
@@ -232,9 +232,9 @@
                                  (|>> (:as java/lang/Object)
                                       (ffi.check org/python/core/PyFunction)))
                                )]
-  (for {@.old (as_is <jvm>)
+  (for [@.old (as_is <jvm>)
         @.jvm (as_is <jvm>)
-        @.python (as_is)}))
+        @.python (as_is)]))
 
 (with_expansions [<jvm> (as_is (def: (call_macro inputs lux macro)
                                  (-> (List Code) Lux org/python/core/PyFunction (Try (Try [Lux (List Code)])))
@@ -262,13 +262,13 @@
 
                                    #.None
                                    (exception.except ..cannot_apply_a_non_function (:as java/lang/Object macro)))))]
-  (for {@.old (as_is <jvm>)
+  (for [@.old (as_is <jvm>)
         @.jvm (as_is <jvm>)
 
         @.python
         (def: (expander macro inputs lux)
           Expander
-          (#try.Success ((:as Macro' macro) inputs lux)))}))
+          (#try.Success ((:as Macro' macro) inputs lux)))]))
 
 (with_expansions [<jvm> (def: host
                           (IO (Host (_.Expression Any) (_.Statement Any)))
@@ -315,7 +315,7 @@
                                       (do try.monad
                                         [_ (execute! content)]
                                         (evaluate! context (_.var (reference.artifact context))))))))))]
-  (for {@.old <jvm>
+  (for [@.old <jvm>
         @.jvm <jvm>
 
         @.python
@@ -355,7 +355,7 @@
                            (def: (re_load context content)
                              (do try.monad
                                [_ (execute! content)]
-                               (evaluate! context (_.var (reference.artifact context)))))))))))}))
+                               (evaluate! context (_.var (reference.artifact context)))))))))))]))
 
 (with_expansions [<jvm> (as_is (exception: .public (invaid_phase_application [partial_application (List Any)
                                                                               arity Nat])
@@ -458,13 +458,13 @@
                                                                                          (ffi.write! 4 (..to_host state)))
                                                                                      handler)]
                                        (..read output)))))]
-  (for {@.old (as_is <jvm>)
+  (for [@.old (as_is <jvm>)
         @.jvm (as_is <jvm>)
 
         @.python
         (def: (extender phase_wrapper handler)
           (-> phase.Wrapper Extender)
-          (:expected handler))}))
+          (:expected handler))]))
 
 (def: (phase_wrapper archive)
   (-> Archive (runtime.Operation phase.Wrapper))
-- 
cgit v1.2.3