diff --git a/Text/XML/Light/Types.hs b/Text/XML/Light/Types.hs
--- a/Text/XML/Light/Types.hs
+++ b/Text/XML/Light/Types.hs
@@ -11,8 +11,12 @@
 -- Basic XML types.
 --
 
+{-# LANGUAGE DeriveDataTypeable #-}
 module Text.XML.Light.Types where
 
+import Data.Typeable(Typeable)
+import Data.Data(Data)
+
 -- | A line is an Integer
 type Line     = Integer
 
@@ -20,7 +24,7 @@
 data Content  = Elem Element
               | Text CData
               | CRef String
-                deriving Show
+                deriving (Show, Typeable, Data)
 
 -- | XML elements
 data Element  = Element {
@@ -28,33 +32,33 @@
                   elAttribs   :: [Attr],
                   elContent   :: [Content],
                   elLine      :: Maybe Line
-                } deriving Show
+                } deriving (Show, Typeable, Data)
 
 -- | XML attributes
 data Attr     = Attr {
                   attrKey :: QName,
                   attrVal :: String
-                } deriving (Eq,Ord,Show)
+                } deriving (Eq, Ord, Show, Typeable, Data)
 
 -- | XML CData
 data CData    = CData {
                   cdVerbatim  :: CDataKind,
                   cdData      :: String,
                   cdLine      :: Maybe Line
-                } deriving Show
+                } deriving (Show, Typeable, Data)
 
 data CDataKind
  = CDataText      -- ^ Ordinary character data; pretty printer escapes &, < etc.
  | CDataVerbatim  -- ^ Unescaped character data; pretty printer embeds it in <![CDATA[..
  | CDataRaw       -- ^ As-is character data; pretty printer passes it along without any escaping or CDATA wrap-up.
-   deriving ( Eq, Show )
+   deriving ( Eq, Show, Typeable, Data )
 
 -- | XML qualified names
 data QName    = QName {
                   qName   :: String,
                   qURI    :: Maybe String,
                   qPrefix :: Maybe String
-                } deriving Show
+                } deriving (Show, Typeable, Data)
 
 
 instance Eq QName where
diff --git a/xml.cabal b/xml.cabal
--- a/xml.cabal
+++ b/xml.cabal
@@ -1,5 +1,5 @@
 Name:            xml
-Version:         1.3.11
+Version:         1.3.12
 Homepage:        http://code.galois.com
 Synopsis:        A simple XML library.
 Description:     A simple XML library.