From 947949648f3dacffa2bb075e1bd561ba31760908 Mon Sep 17 00:00:00 2001 From: aarne Date: Wed, 7 Nov 2007 16:30:56 +0000 Subject: added fields for global options and showable lincats to gfcc --- src/GF/GFCC/LexGFCC.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/GF/GFCC/LexGFCC.hs') diff --git a/src/GF/GFCC/LexGFCC.hs b/src/GF/GFCC/LexGFCC.hs index 8d91493fb..c86195e3d 100644 --- a/src/GF/GFCC/LexGFCC.hs +++ b/src/GF/GFCC/LexGFCC.hs @@ -86,7 +86,7 @@ eitherResIdent tv s = treeFind resWords | s > a = treeFind right | s == a = t -resWords = b "lin" (b "flags" (b "cat" (b "abstract" N N) (b "concrete" N N)) (b "grammar" (b "fun" N N) N)) (b "oper" (b "lindef" (b "lincat" N N) N) (b "printname" (b "pre" N N) N)) +resWords = b "lin" (b "flags" (b "cat" (b "abstract" N N) (b "concrete" N N)) (b "grammar" (b "fun" N N) N)) (b "param" (b "lindef" (b "lincat" N N) (b "oper" N N)) (b "printname" (b "pre" N N) N)) where b s = B s (TS s) unescapeInitTail :: String -> String -- cgit v1.2.3