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

(limited to 'lux-php')

diff --git a/lux-php/source/program.lux b/lux-php/source/program.lux
index 13664b166..a756c18a8 100644
--- a/lux-php/source/program.lux
+++ b/lux-php/source/program.lux
@@ -155,7 +155,7 @@
 (ffi.import: php/runtime/invoke/InvokeHelper
   ["#::."
    ("static" callAny [php/runtime/Memory [php/runtime/Memory] php/runtime/env/Environment php/runtime/env/TraceInfo]
-            "try" php/runtime/Memory)])
+    "try" php/runtime/Memory)])
 
 (ffi.import: php/runtime/lang/Closure
   ["#::."
@@ -504,11 +504,11 @@
   (IO (Platform [Nat _.Label] _.Expression _.Statement))
   (do io.monad
     [host ..host]
-    (wrap {#platform.&file_system (file.async file.default)
+    (wrap [#platform.&file_system (file.async file.default)
            #platform.host host
            #platform.phase php.generate
            #platform.runtime runtime.generate
-           #platform.write (|>> _.code (\ utf8.codec encoded))})))
+           #platform.write (|>> _.code (\ utf8.codec encoded))])))
 
 (def: (program context program)
   (Program _.Expression _.Statement)
@@ -561,10 +561,10 @@
         (do io.monad
           [platform ..platform]
           (exec (do promise.monad
-                  [_ (/.compiler {#/static.host @.php
+                  [_ (/.compiler [#/static.host @.php
                                   #/static.host_module_extension extension
                                   #/static.target (/cli.target service)
-                                  #/static.artifact_extension extension}
+                                  #/static.artifact_extension extension]
                                  ..expander
                                  analysis.bundle
                                  (io.io platform)
-- 
cgit v1.2.3