bugfix in the PGF typechecker and more test cases

This commit is contained in:
krasimir
2010-01-29 21:10:14 +00:00
parent e5de8ea9fe
commit 3b7e39fa4a
15 changed files with 81 additions and 53 deletions

View File

@@ -38,7 +38,7 @@ checkConcrete pgf (lang,cnc) =
checkl = checkLin pgf lang
-}
type PGFSig = (Map.Map CId (Type,Int,[Equation]),Map.Map CId Term,Map.Map CId Term)
type PGFSig = (Map.Map CId (Type,Int,Maybe [Equation]),Map.Map CId Term,Map.Map CId Term)
checkLin :: PGFSig -> CId -> (CId,Term) -> Err ((CId,Term),Bool)
checkLin pgf lang (f,t) =