From 9cdf19bad54a6cc4b322396fdd06f4c1ee045b22 Mon Sep 17 00:00:00 2001
From: Herbert Valerio Riedel <hvr@gnu.org>
Date: Sat, 15 Nov 2014 11:55:43 +0100
Subject: Make compatible with `deepseq-1.4.0.0`
...by not relying on the default method implementation of `rnf`
---
src/Haddock/Types.hs | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
(limited to 'src')
diff --git a/src/Haddock/Types.hs b/src/Haddock/Types.hs
index 1f44fde4..7a66e16d 100644
--- a/src/Haddock/Types.hs
+++ b/src/Haddock/Types.hs
@@ -342,9 +342,9 @@ instance (NFData a, NFData mod)
DocHeader a -> a `deepseq` ()
-instance NFData Name
-instance NFData OccName
-instance NFData ModuleName
+instance NFData Name where rnf x = seq x ()
+instance NFData OccName where rnf x = seq x ()
+instance NFData ModuleName where rnf x = seq x ()
instance NFData id => NFData (Header id) where
rnf (Header a b) = a `deepseq` b `deepseq` ()
--
cgit v1.2.3