[project @ 2001-08-22 12:24:41 by simonmar]
[ghc-hetmet.git] / ghc / tests / lib / IO / hGetLine001.stdout-mingw
diff --git a/ghc/tests/lib/IO/hGetLine001.stdout-mingw b/ghc/tests/lib/IO/hGetLine001.stdout-mingw
deleted file mode 100644 (file)
index d3dc4ef..0000000
+++ /dev/null
@@ -1,120 +0,0 @@
--- !!! testing hGetLine
-
-import IO
-#if defined(__MINGW32__)
-import PrelHandle(hSetBinaryMode)
-#endif
-
--- one version of 'cat'
-main = do
-  let loop h = do b <- hIsEOF h
-                 if b then return ()
-                      else do l <- hGetLine h; putStrLn l; loop h
-  loop stdin 
-
-  h <- openFile "hGetLine001.hs" ReadMode
-
-# if defined(__MINGW32__)
-  hSetBinaryMode h True
-# endif
-
-  hSetBuffering h NoBuffering
-  loop h
-
-  hSeek h AbsoluteSeek 0
-  hSetBuffering h LineBuffering
-  loop h
-
-  hSeek h AbsoluteSeek 0
-  hSetBuffering h (BlockBuffering (Just 83))
-  loop h
--- !!! testing hGetLine\r
-\r
-import IO\r
-#if defined(__MINGW32__)\r
-import PrelHandle(hSetBinaryMode)\r
-#endif\r
-\r
--- one version of 'cat'\r
-main = do\r
-  let loop h = do b <- hIsEOF h\r
-                 if b then return ()\r
-                      else do l <- hGetLine h; putStrLn l; loop h\r
-  loop stdin \r
-\r
-  h <- openFile "hGetLine001.hs" ReadMode\r
-\r
-# if defined(__MINGW32__)\r
-  hSetBinaryMode h True\r
-# endif\r
-\r
-  hSetBuffering h NoBuffering\r
-  loop h\r
-\r
-  hSeek h AbsoluteSeek 0\r
-  hSetBuffering h LineBuffering\r
-  loop h\r
-\r
-  hSeek h AbsoluteSeek 0\r
-  hSetBuffering h (BlockBuffering (Just 83))\r
-  loop h\r
--- !!! testing hGetLine\r
-\r
-import IO\r
-#if defined(__MINGW32__)\r
-import PrelHandle(hSetBinaryMode)\r
-#endif\r
-\r
--- one version of 'cat'\r
-main = do\r
-  let loop h = do b <- hIsEOF h\r
-                 if b then return ()\r
-                      else do l <- hGetLine h; putStrLn l; loop h\r
-  loop stdin \r
-\r
-  h <- openFile "hGetLine001.hs" ReadMode\r
-\r
-# if defined(__MINGW32__)\r
-  hSetBinaryMode h True\r
-# endif\r
-\r
-  hSetBuffering h NoBuffering\r
-  loop h\r
-\r
-  hSeek h AbsoluteSeek 0\r
-  hSetBuffering h LineBuffering\r
-  loop h\r
-\r
-  hSeek h AbsoluteSeek 0\r
-  hSetBuffering h (BlockBuffering (Just 83))\r
-  loop h\r
--- !!! testing hGetLine\r
-\r
-import IO\r
-#if defined(__MINGW32__)\r
-import PrelHandle(hSetBinaryMode)\r
-#endif\r
-\r
--- one version of 'cat'\r
-main = do\r
-  let loop h = do b <- hIsEOF h\r
-                 if b then return ()\r
-                      else do l <- hGetLine h; putStrLn l; loop h\r
-  loop stdin \r
-\r
-  h <- openFile "hGetLine001.hs" ReadMode\r
-\r
-# if defined(__MINGW32__)\r
-  hSetBinaryMode h True\r
-# endif\r
-\r
-  hSetBuffering h NoBuffering\r
-  loop h\r
-\r
-  hSeek h AbsoluteSeek 0\r
-  hSetBuffering h LineBuffering\r
-  loop h\r
-\r
-  hSeek h AbsoluteSeek 0\r
-  hSetBuffering h (BlockBuffering (Just 83))\r
-  loop h\r