diff --git a/Control/DeepSeq.hs b/Control/DeepSeq.hs index f451b1bff5ebd71f7d61282e533ca0ceca486c3f..c6bd510c6033ec3f3182c4b498e4348464ffda72 100644 --- a/Control/DeepSeq.hs +++ b/Control/DeepSeq.hs @@ -64,6 +64,9 @@ import Data.Complex import Data.Array import Data.Fixed import Data.Version +#if MIN_VERSION_base(4,8,0) +import Numeric.Natural ( Natural ) +#endif #if __GLASGOW_HASKELL__ >= 702 import GHC.Generics @@ -208,6 +211,11 @@ instance NFData Word16 where rnf !_ = () instance NFData Word32 where rnf !_ = () instance NFData Word64 where rnf !_ = () +#if MIN_VERSION_base(4,8,0) +-- |/Since: 1.4.0.0/ +instance NFData Natural where rnf !_ = () +#endif + -- |/Since: 1.3.0.0/ instance NFData (Fixed a) where rnf !_ = () diff --git a/changelog.md b/changelog.md index 9d1b80d3442c74d9934b7829e0122b59f4fa315e..dd0170e9bb6f9d0a087681b29e9264a9bce1e7b1 100644 --- a/changelog.md +++ b/changelog.md @@ -15,6 +15,9 @@ instance NFData XYZ where rnf x = seq x () + * New `NFData` instances for `base` types: + - `Numeric.Natural.Natural` + ## 1.3.0.2 *Nov 2013* * Bundled with GHC 7.8.1