-- ** Type 'Node'
data Node
- = NodeElem QName -- ^ Node with some 'NodeAttr' and then other 'Node's as children.
- | NodeAttr QName -- ^ Node with a 'NodeText' child.
+ = NodeElem QName -- ^ Node with some 'NodeAttr' and then other 'Node's as children.
+ | NodeAttr QName -- ^ Node with a 'NodeText' child.
| NodePI PName TL.Text -- ^ Leaf (except for @<?xml?>@ which has 'NodeAttr's.
- | NodeText Text -- ^ Leaf.
- | NodeComment TL.Text -- ^ Leaf.
- | NodeCDATA TL.Text -- ^ Leaf.
+ | NodeText Text -- ^ Leaf.
+ | NodeComment TL.Text -- ^ Leaf.
+ | NodeCDATA TL.Text -- ^ Leaf.
deriving (Eq, Ord, Show)
-- ** Type 'Text'