diff --git a/examples/bronzeage/BronzeageDan.gf b/examples/bronzeage/BronzeageDan.gf
new file mode 100644
index 000000000..a921ad03c
--- /dev/null
+++ b/examples/bronzeage/BronzeageDan.gf
@@ -0,0 +1,5 @@
+--# -path=.:present:prelude
+
+concrete BronzeageDan of Bronzeage = CatDan, SwadeshDan ** BronzeageI with
+  (Lang = LangDan) ;
+
diff --git a/examples/bronzeage/BronzeageI.gf b/examples/bronzeage/BronzeageI.gf
index dbaac3ce9..f0a484c41 100644
--- a/examples/bronzeage/BronzeageI.gf
+++ b/examples/bronzeage/BronzeageI.gf
@@ -1,7 +1,7 @@
 incomplete concrete BronzeageI of Bronzeage = open Lang in {
 
   flags 
-    startcat = Phr ; optimize = all_subs ;
+    startcat = Phr ; optimize = share_subs ;
     unlexer = text ; lexer = text ;
 
   lincat
diff --git a/examples/bronzeage/SwadeshDan.gf b/examples/bronzeage/SwadeshDan.gf
new file mode 100644
index 000000000..e667609f3
--- /dev/null
+++ b/examples/bronzeage/SwadeshDan.gf
@@ -0,0 +1,5 @@
+--# -path=.:present:prelude
+
+concrete SwadeshDan of Swadesh = CatDan ** SwadeshI with
+  (Lang = LangDan) ;
+
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