xml 1.3.11 → 1.3.12
raw patch · 2 files changed
+11/−7 lines, 2 files
Files
- Text/XML/Light/Types.hs +10/−6
- xml.cabal +1/−1
Text/XML/Light/Types.hs view
@@ -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
xml.cabal view
@@ -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.