bugfix: GeneratePMCFG should initialize the lexicon to empty

2010-12-17 09:11:04 +00:00
parent e52f8dda61
commit 2262c105ab
1 changed files with 1 additions and 0 deletions
--- a/src/compiler/GF/Compile/GeneratePMCFG.hs
+++ b/src/compiler/GF/Compile/GeneratePMCFG.hs
@@ -568,6 +568,7 @@ getConcr flags printnames (GrammarEnv last_id catSet seqSet funSet lindefSet crc
        , productions = IntMap.union prodSet coercions
        , pproductions = IntMap.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))))
                                     | (cat,(start,end,schema)) <- Map.toList catSet]
        , totalCats   = last_id+1