diff options
Diffstat (limited to 'libraries/ghc-bignum/src/GHC/Num/Integer.hs')
| -rw-r--r-- | libraries/ghc-bignum/src/GHC/Num/Integer.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/ghc-bignum/src/GHC/Num/Integer.hs b/libraries/ghc-bignum/src/GHC/Num/Integer.hs index b4f6ee0c54..e9e38c9afd 100644 --- a/libraries/ghc-bignum/src/GHC/Num/Integer.hs +++ b/libraries/ghc-bignum/src/GHC/Num/Integer.hs @@ -407,7 +407,7 @@ integerMul x (IS 1#) = x integerMul (IS 1#) y = y integerMul x (IS -1#) = integerNegate x integerMul (IS -1#) y = integerNegate y -#if __GLASGOW_HASKELL__ < 809 +#if __GLASGOW_HASKELL__ < 811 integerMul (IS x) (IS y) = case mulIntMayOflo# x y of 0# -> IS (x *# y) _ -> case (# isTrue# (x >=# 0#), isTrue# (y >=# 0#) #) of |