[project @ 2001-06-01 13:07:35 by sewardj]

[ghc-hetmet.git] / ghc / tests / lib / IO / hGetLine001.stdout

diff --git a/ghc/tests/lib/IO/hGetLine001.stdout b/ghc/tests/lib/IO/hGetLine001.stdout
index 3ace789..54b4bfc 100644 (file)
--- a/ghc/tests/lib/IO/hGetLine001.stdout
+++ b/ghc/tests/lib/IO/hGetLine001.stdout
@@ -10,6 +10,8 @@ main = do
   loop stdin 
 
   h <- openFile "hGetLine001.hs" ReadMode
+  hSetBinaryMode h True
+
   hSetBuffering h NoBuffering
   loop h
 
@@ -32,6 +34,8 @@ main = do
   loop stdin 
 
   h <- openFile "hGetLine001.hs" ReadMode
+  hSetBinaryMode h True
+
   hSetBuffering h NoBuffering
   loop h
 
@@ -54,6 +58,8 @@ main = do
   loop stdin 
 
   h <- openFile "hGetLine001.hs" ReadMode
+  hSetBinaryMode h True
+
   hSetBuffering h NoBuffering
   loop h
 
@@ -76,6 +82,8 @@ main = do
   loop stdin 
 
   h <- openFile "hGetLine001.hs" ReadMode
+  hSetBinaryMode h True
+
   hSetBuffering h NoBuffering
   loop h