[commit: testsuite] ghc-7.4: Make posix003 a little more portable (21e2eec)

Ian Lynagh igloo at earth.li
Tue Jan 31 15:26:17 CET 2012


Repository : ssh://darcs.haskell.org//srv/darcs/testsuite

On branch  : ghc-7.4

http://hackage.haskell.org/trac/ghc/changeset/21e2eece6559f3ac0918f6ad3dc1bcde0fd4c59e

>---------------------------------------------------------------

commit 21e2eece6559f3ac0918f6ad3dc1bcde0fd4c59e
Author: Ian Lynagh <igloo at earth.li>
Date:   Mon Jan 30 21:10:38 2012 +0000

    Make posix003 a little more portable
    
    On OS X, /tmp is a symlink to /private/tmp, so the test prints the wrong
    output. I've changed it to use /dev instead, which is hopefully less
    likely to be a symlink.

>---------------------------------------------------------------

 tests/lib/libposix/posix003.hs     |    2 +-
 tests/lib/libposix/posix003.stdout |    2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/lib/libposix/posix003.hs b/tests/lib/libposix/posix003.hs
index 1298450..b28f9f7 100644
--- a/tests/lib/libposix/posix003.hs
+++ b/tests/lib/libposix/posix003.hs
@@ -6,7 +6,7 @@ import System.IO
 import System.Process
 
 main = do hw <- openFile "po003.out" WriteMode
-          ph <- runProcess "pwd" [] (Just "/tmp") Nothing Nothing (Just hw) Nothing
+          ph <- runProcess "pwd" [] (Just "/dev") Nothing Nothing (Just hw) Nothing
           ec <- waitForProcess ph
           hClose hw
           unless (ec == ExitSuccess) $ error "pwd failed"
diff --git a/tests/lib/libposix/posix003.stdout b/tests/lib/libposix/posix003.stdout
index 0bef00a..5206ef3 100644
--- a/tests/lib/libposix/posix003.stdout
+++ b/tests/lib/libposix/posix003.stdout
@@ -1 +1 @@
-Got: "/tmp"
+Got: "/dev"





More information about the Cvs-ghc mailing list