Yard, still struggling with Clean build system
[cc1516.git] / parse.dcl
index c7d177c..a3640fa 100644 (file)
--- 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