X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=src%2Fparse.dcl;h=abfb8b4443f327806a0cc795c40bc56e5d111994;hb=1e30f02a706b29dae471b6526e7fd0e4bf5bf483;hp=baef54567d9bd2e19a8643509fe0664925ac8f4b;hpb=4932517e2d12cd55922231175bf2f0a06f5b85d6;p=cc1516.git

diff --git a/src/parse.dcl b/src/parse.dcl
index baef545..abfb8b4 100644
--- a/src/parse.dcl
+++ b/src/parse.dcl
@@ -8,7 +8,7 @@ import lex
 :: ParserOutput :== Either String AST
 
 :: AST = AST [VarDecl] [FunDecl]
-:: VarDecl = VarDecl String Type Expr
+:: VarDecl = VarDecl Type String Expr
 :: Type 
 	= TupleType Type Type
 	| ListType Type