X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=parse.dcl;h=ad7edea3ad3fc20ce9645f38767015333544cfe5;hb=a8348a333a567e5a469d1e5f8ec6c3dafc051c91;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