@@ -318,17 +318,6 @@ windowsNewlineMode = IO.NewlineMode
318318 { IO.inputNL = IO.CRLF, IO.outputNL = IO.CRLF
319319 }
320320
321−-- Newline and NewlineMode have standard Show instance from GHC 7 onwards
322−#if __GLASGOW_HASKELL__ < 700
323−instance Show IO.Newline where
324− show IO.CRLF = "CRLF"
325− show IO.LF = "LF"
326−
327−instance Show IO.NewlineMode where
328− show (IO.NewlineMode i o) = "NewlineMode { inputNL = " ++ show i ++
329− ", outputNL = " ++ show o ++ " }"
330−# endif
331−
332321instance Arbitrary IO.NewlineMode where
333322 arbitrary = oneof . map return $
334323 [ IO.noNewlineTranslation, IO.universalNewlineMode, IO.nativeNewlineMode