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-cl/source/program.lux | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'lux-cl') diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux index 3b52fcdd2..55ea81ec4 100644 --- a/lux-cl/source/program.lux +++ b/lux-cl/source/program.lux @@ -337,11 +337,11 @@ (IO (Platform [_.Tag Register] (_.Expression Any) (_.Expression Any))) (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 common_lisp.generate #platform.runtime runtime.generate - #platform.write (|>> _.code (\ encoding.utf8 encoded))}))) + #platform.write (|>> _.code (\ encoding.utf8 encoded))]))) (def: get_ecl_cli_inputs (let [@idx (_.var "i")] @@ -411,10 +411,10 @@ (do io.monad [platform ..platform] (exec (do promise.monad - [_ (/.compiler {#/static.host @.common_lisp + [_ (/.compiler [#/static.host @.common_lisp #/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