From 23ad698f1ad87f9e9838c1e7df1809991c6a1d18 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 1 Jul 2020 19:09:53 -0400
Subject: WIP: Leiningen integration with the new JVM compiler.

---
 stdlib/source/program/compositor.lux | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

(limited to 'stdlib/source/program')

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)))
         ))))
-- 
cgit v1.2.3