X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=src%2Fparse.dcl;h=281c80451da52735801366035ebc4938985f3d9a;hb=f5231ebadae1ac54e25dbf5819debb3ab625826d;hp=55d8a95c35005ac3126ee472c9489bfb18d789ba;hpb=cdb033817c0b30f0ff27b0f4aa67b7cf93c36b4d;p=cc1516.git

diff --git a/src/parse.dcl b/src/parse.dcl
index 55d8a95..281c804 100644
--- a/src/parse.dcl
+++ b/src/parse.dcl
@@ -2,10 +2,11 @@ definition module parse
 
 from Data.Either import :: Either
 from Data.Maybe import :: Maybe
+from StdString import class toString
 
 import lex
 
-:: ParserOutput :== Either String AST
+:: ParserOutput :== Either Error AST
 
 :: AST = AST [VarDecl] [FunDecl]
 :: VarDecl = VarDecl Type String Expr