diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2020-02-11 09:18:09 +0100 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2020-06-17 16:22:04 -0400 |
| commit | f817d816e60a487bca64037095c01e9956225b64 (patch) | |
| tree | 7e2779c7e2485539001b3649bea62554b6d924f7 /testsuite/tests/stranal | |
| parent | aa9e7b7196f03f84579e3b4a09068c668cbe6ffb (diff) | |
| download | haskell-f817d816e60a487bca64037095c01e9956225b64.tar.gz | |
Update testsuite
* support detection of slow ghc-bignum backend (to replace the detection
of integer-simple use). There are still some test cases that the
native backend doesn't handle efficiently enough.
* remove tests for GMP only functions that have been removed from
ghc-bignum
* fix test results showing dependent packages (e.g. integer-gmp) or
showing suggested instances
* fix test using Integer/Natural API or showing internal names
Diffstat (limited to 'testsuite/tests/stranal')
| -rw-r--r-- | testsuite/tests/stranal/sigs/T8598.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/testsuite/tests/stranal/sigs/T8598.hs b/testsuite/tests/stranal/sigs/T8598.hs index 1e0ca6f2b7..c636ae5ea3 100644 --- a/testsuite/tests/stranal/sigs/T8598.hs +++ b/testsuite/tests/stranal/sigs/T8598.hs @@ -3,14 +3,14 @@ module T8598(fun) where import GHC.Float (Double(..)) -import GHC.Integer (decodeDoubleInteger, encodeDoubleInteger) +import GHC.Num.Integer (integerDecodeDouble#, integerEncodeDouble#) -- Float.scaleFloat for Doubles, slightly simplified fun :: Double -> Double fun x | isFix = x | otherwise = case x of - (D# x#) -> case decodeDoubleInteger x# of - (# i, j #) -> D# (encodeDoubleInteger i j) + (D# x#) -> case integerDecodeDouble# x# of + (# i, j #) -> D# (integerEncodeDouble# i j) where isFix = isDoubleFinite x == 0 |