diff options
Diffstat (limited to 'testsuite/tests/ghc-regress/lib/IO/hClose001.hs')
-rw-r--r-- | testsuite/tests/ghc-regress/lib/IO/hClose001.hs | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/testsuite/tests/ghc-regress/lib/IO/hClose001.hs b/testsuite/tests/ghc-regress/lib/IO/hClose001.hs deleted file mode 100644 index 8d31447e95..0000000000 --- a/testsuite/tests/ghc-regress/lib/IO/hClose001.hs +++ /dev/null @@ -1,8 +0,0 @@ -import System.IO -import System.IO.Error - -main = do - h <- openFile "hClose001.tmp" WriteMode - hPutStr h "junk" - hClose h - hPutStr h "junk" `catchIOError` \ err -> if isIllegalOperation err then putStr "Okay\n" else error "Not okay\n" |