X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=parse.dcl;h=785dfbcc17603b92652cdc375a88d4e2c804b91f;hb=4766205e7035a58c8a1fa1557b6e14577ed26f32;hp=a3640fa954d3dd754c87634b5b2a9b90457c0a86;hpb=87fe087ef7e1ad9deff8a725faf1ebbefcb7e549;p=cc1516.git

diff --git a/parse.dcl b/parse.dcl
index a3640fa..785dfbc 100644
--- a/parse.dcl
+++ b/parse.dcl
@@ -1,9 +1,10 @@
 definition module parse
 
-import lex
+from Data.Either import :: Either
+
+from lex import :: LexerOutput, :: Token, :: TokenValue
 
 :: ParserOutput :== Either String AST
 :: AST = If | While //stub
-:: Error = ParseException
 
 parse :: LexerOutput -> ParserOutput