From 8aefdf11b42ebde7dc1877b62b2f067cd52ebb10 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 14 Apr 2017 20:33:36 -0400
Subject: - Initial parser implementation (still missing correct cursors and
 multi-line text).

---
 new-luxc/source/program.lux | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'new-luxc/source/program.lux')

diff --git a/new-luxc/source/program.lux b/new-luxc/source/program.lux
index dbe875d12..b1619e830 100644
--- a/new-luxc/source/program.lux
+++ b/new-luxc/source/program.lux
@@ -2,7 +2,8 @@
   lux
   (lux (control monad)
        [io #- run]
-       [cli #+ program: CLI Monad<CLI>]))
+       [cli #+ program: CLI Monad<CLI>])
+  (luxc ["&;" parser]))
 
 (type: Path Text)
 
@@ -25,7 +26,7 @@
    #sources (List Path)})
 
 (def: (marker tokens)
-  (-> Text (CLI Unit))
+  (-> (List Text) (CLI Unit))
   (cli;after (cli;option tokens)
              (:: Monad<CLI> wrap [])))
 
-- 
cgit v1.2.3