From b30e817e55f0b3b3934c8ac11c2bac5ad2568ab9 Mon Sep 17 00:00:00 2001 From: aarne Date: Wed, 22 Feb 2006 22:29:11 +0000 Subject: tram using compiled resources --- src/GF/Compile/CheckGrammar.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'src/GF/Compile') diff --git a/src/GF/Compile/CheckGrammar.hs b/src/GF/Compile/CheckGrammar.hs index eaf9bc819..21eb1fbbb 100644 --- a/src/GF/Compile/CheckGrammar.hs +++ b/src/GF/Compile/CheckGrammar.hs @@ -287,6 +287,7 @@ computeLType gr t = do Q (IC "Predef") (IC "Float") -> return ty ---- shouldn't be needed Q m c | elem c [cPredef,cPredefAbs] -> return ty + Q m c | elem c [zIdent "Int",zIdent "Float",zIdent "String"] -> return defLinType ---- Q m ident -> checkIn ("module" +++ prt m) $ do ty' <- checkErr (lookupResDef gr m ident) -- cgit v1.2.3