From 719e75105158932558aaa071d2ede50e41a9454b Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Tue, 30 May 2006 14:36:40 +0000
Subject: BronzeageDan

---
 src/GF/Compile/Compile.hs | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'src/GF/Compile/Compile.hs')

diff --git a/src/GF/Compile/Compile.hs b/src/GF/Compile/Compile.hs
index 0dba7a9ec..c79dd2b4d 100644
--- a/src/GF/Compile/Compile.hs
+++ b/src/GF/Compile/Compile.hs
@@ -272,10 +272,8 @@ compileSourceModule opts env@(k,gr,can) mo@(i,mi) = do
       (k',mo3r:_) <- ioeErr $ refreshModule (k,mos) mo3
 
       mo4 <- 
-----        case snd mo1b of
-----          ModMod n | isModCnc n -> 
-        putpp "  optimizing " $ ioeErr $ optimizeModule opts mos mo3r
-----        _ -> return [mo3r]
+        ---- if oElem "check_only" opts 
+          putpp "  optimizing " $ ioeErr $ optimizeModule opts mos mo3r
       return (k',mo4)
  where
    ----   prDebug mo = ioeIO $ putStrLn $ prGrammar $ MGrammar [mo] ---- debug
-- 
cgit v1.2.3