aboutsummaryrefslogtreecommitdiff
path: root/lux-cl
diff options
context:
space:
mode:
authorEduardo Julian2021-09-03 21:51:30 -0400
committerEduardo Julian2021-09-03 21:51:30 -0400
commit891b1cfc82322f8017f0a4f6b707d6fe52024545 (patch)
tree957429c0a2ad850b3570492deabe054fb2ace63e /lux-cl
parente76add6e6f904677f5c09bb2a66dce283f1b848a (diff)
Unified tuple and record syntax.
Diffstat (limited to '')
-rw-r--r--lux-cl/source/program.lux8
1 files changed, 4 insertions, 4 deletions
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)