summaryrefslogtreecommitdiff
path: root/ghc/tests/lib/IO/hGetLine001.stdout-mingw
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/tests/lib/IO/hGetLine001.stdout-mingw')
-rw-r--r--ghc/tests/lib/IO/hGetLine001.stdout-mingw24
1 files changed, 24 insertions, 0 deletions
diff --git a/ghc/tests/lib/IO/hGetLine001.stdout-mingw b/ghc/tests/lib/IO/hGetLine001.stdout-mingw
index a70b13dbf9..d3dc4efc3c 100644
--- a/ghc/tests/lib/IO/hGetLine001.stdout-mingw
+++ b/ghc/tests/lib/IO/hGetLine001.stdout-mingw
@@ -1,6 +1,9 @@
-- !!! testing hGetLine
import IO
+#if defined(__MINGW32__)
+import PrelHandle(hSetBinaryMode)
+#endif
-- one version of 'cat'
main = do
@@ -10,7 +13,10 @@ main = do
loop stdin
h <- openFile "hGetLine001.hs" ReadMode
+
+# if defined(__MINGW32__)
hSetBinaryMode h True
+# endif
hSetBuffering h NoBuffering
loop h
@@ -25,6 +31,9 @@ main = do
-- !!! testing hGetLine
import IO
+#if defined(__MINGW32__)
+import PrelHandle(hSetBinaryMode)
+#endif
-- one version of 'cat'
main = do
@@ -34,7 +43,10 @@ main = do
loop stdin
h <- openFile "hGetLine001.hs" ReadMode
+
+# if defined(__MINGW32__)
hSetBinaryMode h True
+# endif
hSetBuffering h NoBuffering
loop h
@@ -49,6 +61,9 @@ main = do
-- !!! testing hGetLine
import IO
+#if defined(__MINGW32__)
+import PrelHandle(hSetBinaryMode)
+#endif
-- one version of 'cat'
main = do
@@ -58,7 +73,10 @@ main = do
loop stdin
h <- openFile "hGetLine001.hs" ReadMode
+
+# if defined(__MINGW32__)
hSetBinaryMode h True
+# endif
hSetBuffering h NoBuffering
loop h
@@ -73,6 +91,9 @@ main = do
-- !!! testing hGetLine
import IO
+#if defined(__MINGW32__)
+import PrelHandle(hSetBinaryMode)
+#endif
-- one version of 'cat'
main = do
@@ -82,7 +103,10 @@ main = do
loop stdin
h <- openFile "hGetLine001.hs" ReadMode
+
+# if defined(__MINGW32__)
hSetBinaryMode h True
+# endif
hSetBuffering h NoBuffering
loop h