From 87fe087ef7e1ad9deff8a725faf1ebbefcb7e549 Mon Sep 17 00:00:00 2001
From: pimjager <pim@pimjager.nl>
Date: Fri, 26 Feb 2016 13:34:33 +0100
Subject: [PATCH] Yard, still struggling with Clean build system

---
 parse.dcl | 1 +
 parse.icl | 3 ++-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/parse.dcl b/parse.dcl
index c7d177c..a3640fa 100644
--- a/parse.dcl
+++ b/parse.dcl
@@ -4,5 +4,6 @@ import lex
 
 :: ParserOutput :== Either String AST
 :: AST = If | While //stub
+:: Error = ParseException
 
 parse :: LexerOutput -> ParserOutput
diff --git a/parse.icl b/parse.icl
index 3344e27..1a7fb85 100644
--- a/parse.icl
+++ b/parse.icl
@@ -1,9 +1,10 @@
 implementation module parse
 
 import StdString
+import yard
 
 import lex
 
 parse :: LexerOutput -> ParserOutput
 parse (Left e) = Left ("Lexer error: " +++ e)
-parse (Right r) = Left "Parser not yet implemented"
+parse (Right r) = Left "Parser not yet implemented"
\ No newline at end of file
-- 
2.20.1