Add `NFData` instance for new `Natural` type (#2)

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 !_ = ()
 

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