msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

bugfix: GeneratePMCFG should initialize the lexicon to empty

Browse Source
This commit is contained in:
krasimir
2010-12-17 09:11:04 +00:00
parent e4b2b8541f
commit 71e0ec4d41
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/compiler/GF/Compile/GeneratePMCFG.hs
View File

@@ -568,6 +568,7 @@ getConcr flags printnames (GrammarEnv last_id catSet seqSet funSet lindefSet crc
, productions = IntMap.union prodSet coercions , productions = IntMap.union prodSet coercions
, pproductions = IntMap.empty , pproductions = IntMap.empty
, lproductions = Map.empty , lproductions = Map.empty
, lexicon = IntMap.empty
, cnccats = Map.fromList [(i2i cat,PGF.Data.CncCat start end (mkArray (map (renderStyle style{mode=OneLineMode} . ppPath) (getStrPaths schema)))) , cnccats = Map.fromList [(i2i cat,PGF.Data.CncCat start end (mkArray (map (renderStyle style{mode=OneLineMode} . ppPath) (getStrPaths schema))))
| (cat,(start,end,schema)) <- Map.toList catSet] | (cat,(start,end,schema)) <- Map.toList catSet]
, totalCats = last_id+1 , totalCats = last_id+1