[switch around optimizations some
John Meacham <john@repetae.net>**20060406004027] hunk ./Main.hs 535
-    --prog <- if (fopts FO.TypeAnalysis) then do typeAnalyze True prog else return prog
-    prog <- transformProgram "typeAnalyze" True (typeAnalyze True) prog
hunk ./Main.hs 536
-    prog <- etaExpandProg prog
hunk ./Main.hs 541
-    prog <- barendregtProg prog
+    --prog <- barendregtProg prog
hunk ./Main.hs 562
-    prog <- Stats.runStatIO st (etaExpandProgram prog)
-    Stats.print "eta" st
+    --prog <- Stats.runStatIO st (etaExpandProgram prog)
+    --Stats.print "eta" st
+    prog <- etaExpandProg prog
+    prog <- barendregtProg prog
+    prog <- transformProgram "typeAnalyze" True (typeAnalyze True) prog