X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=parse.dcl;h=ad7edea3ad3fc20ce9645f38767015333544cfe5;hb=43f59bf00c11cfbeee906b16063abfca6f4c09cc;hp=c5d2724366bd47ac1bb2e48c67dd335bdd809b24;hpb=fe40818bbc1d327f0adfbbbfe7ecfbe15d4eb053;p=cc1516.git diff --git a/parse.dcl b/parse.dcl index c5d2724..ad7edea 100644 --- a/parse.dcl +++ b/parse.dcl @@ -4,9 +4,9 @@ from Data.Either import :: Either from Data.Maybe import :: Maybe from StdString import class toString -import lex +from lex import :: LexerOutput, :: Error, :: Token, :: TokenValue, :: Pos from AST import :: AST :: ParserOutput :== Either Error AST -parser :: LexerOutput -> ParserOutput +parser :: [Token] -> ParserOutput