aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program
diff options
context:
space:
mode:
authorEduardo Julian2020-07-01 19:09:53 -0400
committerEduardo Julian2020-07-01 19:09:53 -0400
commit23ad698f1ad87f9e9838c1e7df1809991c6a1d18 (patch)
tree752c4cb6fdb709c88e7c82fffd838ac49f836aa4 /stdlib/source/program
parent5d2512af61ac17bca25a4790ea01c24f7d2415da (diff)
WIP: Leiningen integration with the new JVM compiler.
Diffstat (limited to 'stdlib/source/program')
-rw-r--r--stdlib/source/program/compositor.lux11
1 files changed, 6 insertions, 5 deletions
diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux
index 695d8a9d9..4dbd5efcd 100644
--- a/stdlib/source/program/compositor.lux
+++ b/stdlib/source/program/compositor.lux
@@ -109,10 +109,7 @@
[Packager Path]
(Promise Any)))
(do {@ promise.monad}
- [platform (promise.future platform)
- console (|> console.system
- promise.future
- (:: @ map (|>> try.assume console.async)))]
+ [platform (promise.future platform)]
(case service
(#/cli.Compilation compilation)
(<| (or-crash! "Compilation failed:")
@@ -148,5 +145,9 @@
## TODO: Fix the interpreter...
(undefined)
## (<| (or-crash! "Interpretation failed:")
- ## (interpreter.run (try.with promise.monad) console platform interpretation generation-bundle))
+ ## (do {@ promise.monad}
+ ## [console (|> console.system
+ ## promise.future
+ ## (:: @ map (|>> try.assume console.async)))]
+ ## (interpreter.run (try.with promise.monad) console platform interpretation generation-bundle)))
))))