diff options
| author | aarne <aarne@cs.chalmers.se> | 2007-11-12 21:42:13 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2007-11-12 21:42:13 +0000 |
| commit | 504bdedcc3eb709b3cd57b2fb39c28b64e9ba327 (patch) | |
| tree | 6104f9792476f7af1c7caaa4a3a98a55aa80984e /src/GF/Devel/Compile.hs | |
| parent | 7e40df7d4c4dc475db08483dac5fd01823598a26 (diff) | |
made Devel versions of Compute, CheckGrammar, Optimize, etc, to leave GF 2.8 untouched when experimenting
Diffstat (limited to 'src/GF/Devel/Compile.hs')
| -rw-r--r-- | src/GF/Devel/Compile.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/GF/Devel/Compile.hs b/src/GF/Devel/Compile.hs index f5a16114f..1b6f2710e 100644 --- a/src/GF/Devel/Compile.hs +++ b/src/GF/Devel/Compile.hs @@ -6,9 +6,9 @@ import GF.Compile.Extend import GF.Compile.Rebuild import GF.Compile.Rename import GF.Grammar.Refresh -import GF.Compile.CheckGrammar -import GF.Compile.Optimize -import GF.Compile.Evaluate ---- +import GF.Devel.CheckGrammar +import GF.Devel.Optimize +--import GF.Compile.Evaluate ---- import GF.Devel.OptimizeGF --import GF.Canon.Share --import GF.Canon.Subexpressions (elimSubtermsMod,unSubelimModule) @@ -166,7 +166,7 @@ compileSourceModule opts env@(k,gr) mo@(i,mi) = do (k',mo3r:_) <- putpp " refreshing " $ ioeErr $ refreshModule (k,mos) mo3 intermOut opts (iOpt "show_refresh") (prMod mo3r) - let eenv = emptyEEnv + let eenv = () --- emptyEEnv (mo4,eenv') <- ---- if oElem "check_only" opts putpp " optimizing " $ ioeErr $ optimizeModule opts (mos,eenv) mo3r |