git.iko.soy/text
on master help sign in
Add support for `deepseq-1.4.0.0` (addresses #100)
4115e19Herbert Valerio Riedel
Data/Text.hs+2−2
compare with master
unifiedsplit
@@ -199,7 +199,7 @@ import Prelude (Char, Bool(..), Int, Maybe(..), String,
199 (&&), (||), (+), (-), (.), ($), ($!), (>>),
199 (&&), (||), (+), (-), (.), ($), ($!), (>>),
200 not, return, otherwise, quot)
200 not, return, otherwise, quot)
201#if defined(HAVE_DEEPSEQ)
201#if defined(HAVE_DEEPSEQ)
202−import Control.DeepSeq (NFData)
202+import Control.DeepSeq (NFData(rnf))
203#endif
203#endif
204#if defined(ASSERTS)
204#if defined(ASSERTS)
205import Control.Exception (assert)
205import Control.Exception (assert)
@@ -346,7 +346,7 @@ instance Exts.IsList Text where
346#endif
346#endif
347
347
348#if defined(HAVE_DEEPSEQ)
348#if defined(HAVE_DEEPSEQ)
349−instance NFData Text
349+instance NFData Text where rnf !_ = ()
350#endif
350#endif
351
351
352-- | This instance preserves data abstraction at the cost of inefficiency.
352-- | This instance preserves data abstraction at the cost of inefficiency.