GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-10 19:52:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

started adding GF back optimization (Factorize)

Browse Source
This commit is contained in:
aarne
2007-12-07 13:00:02 +00:00
parent b6484890b1
commit a935576674
3 changed files with 267 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/GF/Devel/Compile/Compile.hs
View File

@@ -7,14 +7,14 @@ import GF.Devel.Compile.Rename
import GF.Devel.Compile.CheckGrammar
import GF.Devel.Compile.Refresh
import GF.Devel.Compile.Optimize
----import GF.Devel.OptimizeGF
import GF.Devel.Compile.Factorize
import GF.Devel.Grammar.Terms
import GF.Devel.Grammar.Modules
import GF.Devel.Grammar.Judgements
import GF.Infra.Ident
import GF.Devel.Grammar.PrGF
----import GF.Grammar.Lookup
----import GF.Devel.Grammar.Lookup
import GF.Devel.ReadFiles
import GF.Infra.Option ----
@@ -161,8 +161,10 @@ compileSourceModule opts env@(k,gr) mo@(i,mi) = do
moo <- putpp " optimizing " $ ioeErr $ optimizeModule opts gr mox
intermOut opts (iOpt "show_optimize") (prMod moo)
mof <- putpp " factorizing " $ ioeErr $ optimizeModule opts gr moo
intermOut opts (iOpt "show_factorize") (prMod mof)
return (k,moo) ----
return (k,mof) ----
{- ----