started a directory of grammars testing testgf3 features

2008-02-22 15:17:50 +00:00
parent 9e6064709f
commit 2faba90119
7 changed files with 25 additions and 14 deletions
--- a/src/GF/Devel/Compile/CheckGrammar.hs
+++ b/src/GF/Devel/Compile/CheckGrammar.hs
@@ -516,6 +516,8 @@ inferLType gr trm = case trm of

   Empty -> return (trm, typeStr)

+   EParam _ cos -> return (trm, typePType) ---- check cos
+
   C s1 s2 -> 
     check2 (flip justCheck typeStr) C s1 s2 typeStr