diff options
Diffstat (limited to 'libraries/integer-gmp')
-rw-r--r-- | libraries/integer-gmp/src/GHC/Integer/GMP/Internals.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/libraries/integer-gmp/src/GHC/Integer/GMP/Internals.hs b/libraries/integer-gmp/src/GHC/Integer/GMP/Internals.hs index 3af21e7e74..f754e42862 100644 --- a/libraries/integer-gmp/src/GHC/Integer/GMP/Internals.hs +++ b/libraries/integer-gmp/src/GHC/Integer/GMP/Internals.hs @@ -100,13 +100,13 @@ sqrInteger = I.integerSqr wordToNegInteger :: Word# -> Integer wordToNegInteger = I.integerFromWordNeg# -{-# DEPRECATED bigNatToInteger "Use integerFromBigNat instead" #-} +{-# DEPRECATED bigNatToInteger "Use integerFromBigNat# instead" #-} bigNatToInteger :: BigNat -> Integer -bigNatToInteger (BN# i) = I.integerFromBigNat i +bigNatToInteger (BN# i) = I.integerFromBigNat# i -{-# DEPRECATED bigNatToNegInteger "Use integerFromBigNatNeg instead" #-} +{-# DEPRECATED bigNatToNegInteger "Use integerFromBigNatNeg# instead" #-} bigNatToNegInteger :: BigNat -> Integer -bigNatToNegInteger (BN# i) = I.integerFromBigNatNeg i +bigNatToNegInteger (BN# i) = I.integerFromBigNatNeg# i type GmpLimb = Word type GmpLimb# = Word# |