repositories
/
cc1516.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fixed annote
[cc1516.git]
/
parse.dcl
diff --git
a/parse.dcl
b/parse.dcl
index
a3640fa
..
ad7edea
100644
(file)
--- a/
parse.dcl
+++ b/
parse.dcl
@@
-1,9
+1,12
@@
definition module parse
definition module parse
-import lex
+from Data.Either import :: Either
+from Data.Maybe import :: Maybe
+from StdString import class toString
-:: ParserOutput :== Either String AST
-:: AST = If | While //stub
-:: Error = ParseException
+from lex import :: LexerOutput, :: Error, :: Token, :: TokenValue, :: Pos
+from AST import :: AST
-parse :: LexerOutput -> ParserOutput
+:: ParserOutput :== Either Error AST
+
+parser :: [Token] -> ParserOutput