X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=parse.icl;h=5551f20596b876ed9d8377e6fad83cf2eb0ffc45;hb=4766205e7035a58c8a1fa1557b6e14577ed26f32;hp=1a7fb85b24c7e09d66ee10c42e425661acc26940;hpb=87fe087ef7e1ad9deff8a725faf1ebbefcb7e549;p=cc1516.git

diff --git a/parse.icl b/parse.icl
index 1a7fb85..5551f20 100644
--- 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"