[commit: ghc] master: Remove some disabled code (f7b74fe)
Ian Lynagh
igloo at earth.li
Tue May 29 15:13:07 CEST 2012
Repository : ssh://darcs.haskell.org//srv/darcs/ghc
On branch : master
http://hackage.haskell.org/trac/ghc/changeset/f7b74fe9c8264808f3f30f60233bb23931af28b2
>---------------------------------------------------------------
commit f7b74fe9c8264808f3f30f60233bb23931af28b2
Author: Ian Lynagh <igloo at earth.li>
Date: Tue May 29 13:31:32 2012 +0100
Remove some disabled code
>---------------------------------------------------------------
compiler/utils/Binary.hs | 3 ---
1 files changed, 0 insertions(+), 3 deletions(-)
diff --git a/compiler/utils/Binary.hs b/compiler/utils/Binary.hs
index feb4be5..77bd190 100644
--- a/compiler/utils/Binary.hs
+++ b/compiler/utils/Binary.hs
@@ -267,9 +267,6 @@ expandBin (BinMem _ _ sz_r arr_r) off = do
copyBytes new old sz
writeFastMutInt sz_r sz'
writeIORef arr_r arr'
- when False $ -- disabled
- hPutStrLn stderr ("Binary: expanding to size: " ++ show sz')
- return ()
expandBin (BinIO _ _ _) _ = return ()
-- no need to expand a file, we'll assume they expand by themselves.
More information about the Cvs-ghc
mailing list