From 50cc5fbe7cc8abde05085944393fcec4c791402f Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 5 Sep 2017 18:36:09 -0400
Subject: - Updated new compiler's code to the recent changes in the language.
 - WIP: Some other changes/additions to the new compiler.

---
 new-luxc/source/luxc/generator/procedure.jvm.lux | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'new-luxc/source/luxc/generator/procedure.jvm.lux')

diff --git a/new-luxc/source/luxc/generator/procedure.jvm.lux b/new-luxc/source/luxc/generator/procedure.jvm.lux
index 258d90689..77828c952 100644
--- a/new-luxc/source/luxc/generator/procedure.jvm.lux
+++ b/new-luxc/source/luxc/generator/procedure.jvm.lux
@@ -1,9 +1,9 @@
 
 (;module:
   lux
-  (lux (control monad)
+  (lux (control [monad #+ do])
        (data text/format
-             maybe
+             [maybe]
              (coll ["d" dict])))
   (luxc ["&" base]
         (lang ["ls" synthesis])
@@ -14,6 +14,6 @@
   (-> (-> ls;Synthesis (Lux $;Inst)) Text (List ls;Synthesis)
       (Lux $;Inst))
   (default (&;fail (format "Unknown procedure: " (%t name)))
-    (do Monad<Maybe>
+    (do maybe;Monad<Maybe>
       [proc (d;get name &&common;procedures)]
       (wrap (proc generate args)))))
-- 
cgit v1.2.3