git.iko.soy/text
on master help sign in
Fix test suite under GHC 7.10
f74427cBryan O'Sullivan
tests/Tests/Properties.hs+2−2
compare with master
unifiedsplit
@@ -14,7 +14,7 @@ import Data.Bits ((.&.))
14import Data.Char (chr, isDigit, isHexDigit, isLower, isSpace, isUpper, ord)
14import Data.Char (chr, isDigit, isHexDigit, isLower, isSpace, isUpper, ord)
15import Data.Int (Int8, Int16, Int32, Int64)
15import Data.Int (Int8, Int16, Int32, Int64)
16import Data.Monoid (Monoid(..))
16import Data.Monoid (Monoid(..))
17−import Data.String (fromString)
17+import Data.String (IsString(fromString))
18import Data.Text.Encoding.Error
18import Data.Text.Encoding.Error
19import Data.Text.Foreign
19import Data.Text.Foreign
20import Data.Text.Internal.Encoding.Utf8
20import Data.Text.Internal.Encoding.Utf8
@@ -812,7 +812,7 @@ tl_hexadecimal m s ox =
812 p = if ox then "0x" else ""
812 p = if ox then "0x" else ""
813 n = getPositive m :: Int
813 n = getPositive m :: Int
814
814
815−isFloaty c = c `elem` "+-.0123456789eE"
815+isFloaty c = c `elem` ("+-.0123456789eE" :: String)
816
816
817t_read_rational p tol (n::Double) s =
817t_read_rational p tol (n::Double) s =
818 case p (T.pack (show n) `T.append` t) of
818 case p (T.pack (show n) `T.append` t) of
tests/cabal.config−1
@@ -1,7 +1,6 @@
1-- These flags help to speed up building the test suite.
1-- These flags help to speed up building the test suite.
2
2
3documentation: False
3documentation: False
4−executable-profiling: False
5executable-stripping: False
4executable-stripping: False
6flags: developer
5flags: developer
7library-profiling: False
6library-profiling: False