From 6aca925ef28bf0a0a311bc8e33ec9a5aa2ded6ad Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Mon, 5 Mar 2007 14:52:58 +0000 Subject: add tests from GHC testsuite --- tests/fileexist01.hs | 5 +++++ 1 file changed, 5 insertions(+) create mode 100644 tests/fileexist01.hs (limited to 'tests/fileexist01.hs') diff --git a/tests/fileexist01.hs b/tests/fileexist01.hs new file mode 100644 index 0000000..7bddda9 --- /dev/null +++ b/tests/fileexist01.hs @@ -0,0 +1,5 @@ +-- test System.Posix.fileExist +import System.Posix +main = do + fileExist "fileexist01.hs" >>= print + fileExist "does not exist" >>= print -- cgit v1.2.3