X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=AST.dcl;h=cb2e5b790e5efbbde642495ce13800db8203cf56;hb=cf5417094083fe82194940a157b6bdc74e40d844;hp=4fd4121eb851c93414e49efb011767977604b22a;hpb=2953e6cc260d8243e5434b7e787258ab073d34d2;p=cc1516.git diff --git a/AST.dcl b/AST.dcl index 4fd4121..cb2e5b7 100644 --- a/AST.dcl +++ b/AST.dcl @@ -1,7 +1,7 @@ definition module AST from Data.Maybe import :: Maybe -from StdOverloaded import class toString +from StdOverloaded import class toString, class == :: Pos = {line :: Int, col :: Int} :: AST = AST [VarDecl] [FunDecl]