Commit 96ea9f2f authored by bos's avatar bos
Browse files

QuickCheckUtils: drop support for GHC < 7

parent cca3e879
......@@ -318,17 +318,6 @@ windowsNewlineMode = IO.NewlineMode
{ IO.inputNL = IO.CRLF, IO.outputNL = IO.CRLF
}
-- Newline and NewlineMode have standard Show instance from GHC 7 onwards
#if __GLASGOW_HASKELL__ < 700
instance Show IO.Newline where
show IO.CRLF = "CRLF"
show IO.LF = "LF"
instance Show IO.NewlineMode where
show (IO.NewlineMode i o) = "NewlineMode { inputNL = " ++ show i ++
", outputNL = " ++ show o ++ " }"
# endif
instance Arbitrary IO.NewlineMode where
arbitrary = oneof . map return $
[ IO.noNewlineTranslation, IO.universalNewlineMode, IO.nativeNewlineMode
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment