From f439895ef9b008cf0e3e7224b0ee3f95215fee79 Mon Sep 17 00:00:00 2001 From: bringert Date: Mon, 7 Apr 2008 15:57:04 +0000 Subject: Added GF.GFCC.Macros.lookStartCat. Changed GF.GFCC:API to use it (before, startCat always returned "S"!). GFCCtoJS has not been changed, Moises will do that. --- src/GF/GFCC/API.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/GF/GFCC/API.hs') diff --git a/src/GF/GFCC/API.hs b/src/GF/GFCC/API.hs index 9bfe98b95..c266a5553 100644 --- a/src/GF/GFCC/API.hs +++ b/src/GF/GFCC/API.hs @@ -122,7 +122,7 @@ languages mgr = [l | CId l <- cncnames (gfcc mgr)] categories mgr = [c | CId c <- Map.keys (cats (abstract (gfcc mgr)))] -startCat mgr = "S" ---- +startCat mgr = lookStartCat (gfcc mgr) emptyMultiGrammar = MultiGrammar emptyGFCC -- cgit v1.2.3