on master help sign in
Add support for `deepseq-1.4.0.0` (addresses #100)

The default method implementation has changed in `deepseq-1.4.0.0`. (see haskell/deepseq#1 for details). This simply sets the `rnf` implementation explicitly to avoid relying on the default method's semantics.

commit4115e196bde073d5deaa3759807a8647f3f3c6fa authorHerbert Valerio Riedel <hvr@gnu.org> dateMon 17 Nov 2014, 09:53 (12 years ago) parentfbae5a0
1 file changed+2−2
Data/Text.hs+2−2
Data/Text.hs+2−2
@@ -199,7 +199,7 @@ import Prelude (Char, Bool(..), Int, Maybe(..), String,
199199 (&&), (||), (+), (-), (.), ($), ($!), (>>),
200200 not, return, otherwise, quot)
201201#if defined(HAVE_DEEPSEQ)
202−import Control.DeepSeq (NFData)
202+import Control.DeepSeq (NFData(rnf))
203203#endif
204204#if defined(ASSERTS)
205205import Control.Exception (assert)
@@ -346,7 +346,7 @@ instance Exts.IsList Text where
346346#endif
347347
348348#if defined(HAVE_DEEPSEQ)
349−instance NFData Text
349+instance NFData Text where rnf !_ = ()
350350#endif
351351
352352-- | This instance preserves data abstraction at the cost of inefficiency.