From 891b1cfc82322f8017f0a4f6b707d6fe52024545 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 3 Sep 2021 21:51:30 -0400
Subject: Unified tuple and record syntax.

---
 lux-jvm/source/program.lux | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

(limited to 'lux-jvm/source/program.lux')

diff --git a/lux-jvm/source/program.lux b/lux-jvm/source/program.lux
index 3a2e3a55b..304e2195f 100644
--- a/lux-jvm/source/program.lux
+++ b/lux-jvm/source/program.lux
@@ -234,14 +234,14 @@
     [... host jvm/host.host
      [loader host] jvm.host]
     (in [loader
-         {#platform.&file_system (file.async file.default)
+         [#platform.&file_system (file.async file.default)
           #platform.host host
           ... #platform.phase jvm.generate
           #platform.phase expression.translate
           ... #platform.runtime runtime.generate
           #platform.runtime runtime.translate
           #platform.phase_wrapper ..phase_wrapper
-          #platform.write product.right}])))
+          #platform.write product.right]])))
 
 (def: (extender phase_wrapper)
   (-> phase.Wrapper Extender)
@@ -277,16 +277,16 @@
   (async.future (\ world/program.default exit +0)))
 
 (program: [service /cli.service]
-  (let [static {#/static.host @.jvm
+  (let [static [#/static.host @.jvm
                 #/static.host_module_extension ".jvm"
                 #/static.target (/cli.target service)
-                #/static.artifact_extension ".class"}]
+                #/static.artifact_extension ".class"]]
     (exec (do async.monad
             [[loader platform] (async.future ..platform)
-             _ (/.compiler {#/static.host @.jvm
+             _ (/.compiler [#/static.host @.jvm
                             #/static.host_module_extension ".jvm"
                             #/static.target (/cli.target service)
-                            #/static.artifact_extension ".class"}
+                            #/static.artifact_extension ".class"]
                            ..expander
                            (analysis.bundle loader)
                            (io.io platform)
-- 
cgit v1.2.3