X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=parse.dcl;h=785dfbcc17603b92652cdc375a88d4e2c804b91f;hb=4766205e7035a58c8a1fa1557b6e14577ed26f32;hp=c7d177ccd7c2aa31b6c7243f9c8f36d61137d08c;hpb=953019d8255b9779d67fb1cb6c8946f589a24936;p=cc1516.git diff --git a/parse.dcl b/parse.dcl index c7d177c..785dfbc 100644 --- a/parse.dcl +++ b/parse.dcl @@ -1,6 +1,8 @@ definition module parse -import lex +from Data.Either import :: Either + +from lex import :: LexerOutput, :: Token, :: TokenValue :: ParserOutput :== Either String AST :: AST = If | While //stub