bugfix: GF.Compile.GrammarToGFCC should not strip the parameter values

2009-11-12 20:09:59 +00:00
parent 6898667b3e
commit 3d838e0172
2 changed files with 7 additions and 3 deletions
@@ -52,7 +52,7 @@ optimizeModule opts ms m@(name,mi)
   oopts = opts `addOptions` flagsModule m

   updateEvalInfo mi (i,info) = do
-     info' <- evalInfo oopts ms m i info
+     info' <- evalInfo oopts ms (name,mi) i info
     return (updateModule mi i info')

 evalInfo :: Options -> [SourceModule] -> SourceModule -> Ident -> Info -> Err Info