Commit 777dff2e authored by Ian Lynagh's avatar Ian Lynagh
Browse files

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.
parent 0b395e15
......@@ -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"
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment