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

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