werkt

[cc1516.git] / parse.icl

diff --git a/parse.icl b/parse.icl
index 1a7fb85..5551f20 100644 (file)
--- a/parse.icl
+++ b/parse.icl
@@ -1,10 +1,11 @@
 implementation module parse
 
 import StdString
-import yard
+import Data.Either
 
+import yard
 import lex
 
 parse :: LexerOutput -> ParserOutput
 parse (Left e) = Left ("Lexer error: " +++ e)
-parse (Right r) = Left "Parser not yet implemented"
\ No newline at end of file
+parse (Right r) = Left "Parser not yet implemented"