From ce6c032c6ff8da9b8016cc3f042787c2e3606d14 Mon Sep 17 00:00:00 2001 From: aarne Date: Tue, 22 Nov 2005 22:00:47 +0000 Subject: experimenting with English VP --- src/GF/Compile/CheckGrammar.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/GF/Compile') diff --git a/src/GF/Compile/CheckGrammar.hs b/src/GF/Compile/CheckGrammar.hs index cbc69e2f6..c46c51af7 100644 --- a/src/GF/Compile/CheckGrammar.hs +++ b/src/GF/Compile/CheckGrammar.hs @@ -266,7 +266,7 @@ checkIfLinType st typ0 = do where checkInh (label,typ) = checkIfParType st typ - checkLin (label,typ) = checkIfStrType st typ + checkLin (label,typ) = return () ---- checkIfStrType st typ computeLType :: SourceGrammar -> Type -> Check Type -- cgit v1.2.3