summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghc-regress/lib
diff options
context:
space:
mode:
authorIan Lynagh <igloo@earth.li>2011-06-23 15:04:24 +0100
committerIan Lynagh <igloo@earth.li>2011-06-23 15:04:24 +0100
commit0da9cdbb3ac12d8badfd39c0801ec1699540481d (patch)
tree45f3c4d41f124735510c1fb9071b2a8b84aa65f7 /testsuite/tests/ghc-regress/lib
parentf50237c0acaa1f07716c0f62c35dbbb3f392f505 (diff)
downloadhaskell-0da9cdbb3ac12d8badfd39c0801ec1699540481d.tar.gz
Semi-fix 4006 on msys
We were getting: 4006.exe: echo: createProcess: does not exist (No such file or directory) so now we use "printf" instead of "echo".
Diffstat (limited to 'testsuite/tests/ghc-regress/lib')
-rw-r--r--testsuite/tests/ghc-regress/lib/should_run/4006.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/ghc-regress/lib/should_run/4006.hs b/testsuite/tests/ghc-regress/lib/should_run/4006.hs
index ea5c1ac458..662b0f62e3 100644
--- a/testsuite/tests/ghc-regress/lib/should_run/4006.hs
+++ b/testsuite/tests/ghc-regress/lib/should_run/4006.hs
@@ -1,7 +1,7 @@
import System.Process
testUnicode :: String -> IO String
-testUnicode str = init `fmap` (readProcess "echo" [str] "")
+testUnicode str = readProcess "printf" ["%s", str] ""
main = do
testUnicode "It works here" >>= putStrLn