[minor improvements
John Meacham <john@repetae.net>**20090306103607
 Ignore-this: 7a317625312dca537d85c025ffaf82d
] hunk ./Main.hs 644
+    prog <- Demand.analyzeProgram prog
+    prog <- return $ E.CPR.cprAnalyzeProgram prog
hunk ./lib/base/Numeric.hs 208
-                  [] -> '0':'.':take dec' (repeat '0') ++ "e0"
+                  [] -> '0':'.':replicate dec' '0' ++ "e0"
hunk ./lib/base/Prelude.hs 415
+{-# RULES "take/repeat"   forall n x . take n (repeat x) = replicate n x #-}