diff options
Diffstat (limited to 'testsuite/tests/ghc-regress/lib/IO/openFile003.hs')
| -rw-r--r-- | testsuite/tests/ghc-regress/lib/IO/openFile003.hs | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/testsuite/tests/ghc-regress/lib/IO/openFile003.hs b/testsuite/tests/ghc-regress/lib/IO/openFile003.hs deleted file mode 100644 index 81b69c40ec..0000000000 --- a/testsuite/tests/ghc-regress/lib/IO/openFile003.hs +++ /dev/null @@ -1,14 +0,0 @@ -import System.IO -import System.IO.Error - --- !!! Open a directory (should fail) - -main = do - r <- tryIOError (openFile "." ReadMode) - print r - r <- tryIOError (openFile "." WriteMode) - print r - r <- tryIOError (openFile "." AppendMode) - print r - r <- tryIOError (openFile "." ReadWriteMode) - print r |