X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FhsSyn%2FHsDoc.hs;h=1f3adafec1b1a3469e6a4a681291724876ef8293;hb=79f275092de54ba5f7e7336c13231ad5198befdf;hp=d8e5b677fb50fb4df2123fc9249d3501e4cde2c1;hpb=63489d40bdee972656ff115ab2309b809c0e39fc;p=ghc-hetmet.git

diff --git a/compiler/hsSyn/HsDoc.hs b/compiler/hsSyn/HsDoc.hs
index d8e5b67..1f3adaf 100644
--- a/compiler/hsSyn/HsDoc.hs
+++ b/compiler/hsSyn/HsDoc.hs
@@ -1,3 +1,5 @@
+{-# LANGUAGE DeriveDataTypeable #-}
+
 module HsDoc (
   HsDocString(..),
   LHsDocString,
@@ -10,8 +12,10 @@ import Outputable
 import SrcLoc
 import FastString
 
+import Data.Data
+
 newtype HsDocString = HsDocString FastString
-  deriving (Eq, Show)
+  deriving (Eq, Show, Data, Typeable)
 
 type LHsDocString = Located HsDocString