diff --git a/libraries/base/GHC/Natural.hs b/libraries/base/GHC/Natural.hs index fef76df43b78ba116a1d9256a94df10ded06d88b..bdc92438869f5f1fedaf72c3252eb6362d5629ba 100644 --- a/libraries/base/GHC/Natural.hs +++ b/libraries/base/GHC/Natural.hs @@ -228,7 +228,7 @@ remNatural (NatJ# n) (NatS# d) = NatS# (remBigNatWord n d) remNatural (NatJ# n) (NatJ# d) = bigNatToNatural (remBigNat n d) -- {-# CONSTANT_FOLDED remNatural #-} --- | @since 4.X.0.0 +-- | @since 4.12.0.0 naturalToInteger :: Natural -> Integer naturalToInteger (NatS# w) = wordToInteger w naturalToInteger (NatJ# bn) = Jp# bn