summaryrefslogtreecommitdiff
path: root/src/GF/GFCC/API.hs
diff options
context:
space:
mode:
authorbringert <bringert@cs.chalmers.se>2008-04-07 15:57:04 +0000
committerbringert <bringert@cs.chalmers.se>2008-04-07 15:57:04 +0000
commitf439895ef9b008cf0e3e7224b0ee3f95215fee79 (patch)
treebc1be6a66b56e9da45b8b58672695e01930bf136 /src/GF/GFCC/API.hs
parent898c079d8444109e08ed2eed1e218d5f5ed427a6 (diff)
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.
Diffstat (limited to 'src/GF/GFCC/API.hs')
-rw-r--r--src/GF/GFCC/API.hs2
1 files changed, 1 insertions, 1 deletions
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