diff options
Diffstat (limited to 'ghc/tests/lib/IO/hGetLine001.stdout-mingw')
-rw-r--r-- | ghc/tests/lib/IO/hGetLine001.stdout-mingw | 24 |
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
|