X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=AST.icl;h=6f2e5c63a50b3c5d406a01c46d5c235314e3630d;hb=220cb1cc56feab3f818503838b3afd7ea2225403;hp=90d1e53870967dedafb737a435ddae8f3477d668;hpb=817af8de40d49db39dcf02ee5fe346f0d7b73118;p=cc1516.git

diff --git a/AST.icl b/AST.icl
index 90d1e53..6f2e5c6 100644
--- a/AST.icl
+++ b/AST.icl
@@ -110,3 +110,6 @@ printFunCall s args = [s, "(":printersperse "," args] ++ [")"]
 
 derive gEq Op2
 instance == Op2 where (==) o1 o2 = gEq{|*|} o1 o2
+
+instance zero Pos where
+	zero = {line=0, col=0}