diff options
| -rw-r--r-- | ghc/lib/std/IO.lhs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/ghc/lib/std/IO.lhs b/ghc/lib/std/IO.lhs index 0ca21801ea..fbb5cd34ad 100644 --- a/ghc/lib/std/IO.lhs +++ b/ghc/lib/std/IO.lhs @@ -886,7 +886,6 @@ openFile_main f mode hClose :: Handle -> IO () hClose h = do mut <- readIORef (mut h) - putStrLn ( "hClose: state is " ++ show mut) if state mut == HClosed then mkErr h ("hClose on closed handle " ++ show h) |