Data.XML.Parser.Mid.Doctype

Document type declaration parsers.

https://www.w3.org/TR/REC-xml/#dt-doctype

All documentation examples assume the following setup:

:set -XOverloadedStrings
import Data.Attoparsec.ByteString

Documentation

data Doctype

https://www.w3.org/TR/REC-xml/#dt-doctype

Constructors

Doctype Text (Maybe ExternalID) InternalSubset

Instances

Eq Doctype

Defined in Data.XML.Parser.Mid.Doctype

Methods

(==) :: Doctype -> Doctype -> Bool

(/=) :: Doctype -> Doctype -> Bool

Ord Doctype

Defined in Data.XML.Parser.Mid.Doctype

Methods

compare :: Doctype -> Doctype -> Ordering

(<) :: Doctype -> Doctype -> Bool

(<=) :: Doctype -> Doctype -> Bool

(>) :: Doctype -> Doctype -> Bool

(>=) :: Doctype -> Doctype -> Bool

max :: Doctype -> Doctype -> Doctype

min :: Doctype -> Doctype -> Doctype

Read Doctype

Defined in Data.XML.Parser.Mid.Doctype

Methods

readsPrec :: Int -> ReadS Doctype

readList :: ReadS [Doctype]

readPrec :: ReadPrec Doctype

readListPrec :: ReadPrec [Doctype]

Show Doctype

Defined in Data.XML.Parser.Mid.Doctype

Methods

showsPrec :: Int -> Doctype -> ShowS

show :: Doctype -> String

showList :: [Doctype] -> ShowS

doctype :: CharParsing m => Monad m => m Doctype

https://www.w3.org/TR/REC-xml/#NT-doctypedecl

>>> parseOnly doctype "<!DOCTYPE greeting SYSTEM 'hello.dtd'>"
Right (Doctype "greeting" (Just (SystemID "hello.dtd")) (InternalSubset {_elementTypes = [], _attributeLists = [], _generalEntities = [], _parameterEntities = [], _notations = [], _instructions = []}))
>>> parseOnly doctype "<!DOCTYPE foo [ <!ENTITY x '&lt;'> ]>"
Right (Doctype "foo" Nothing (InternalSubset {_elementTypes = [], _attributeLists = [], _generalEntities = [GeneralEntity "x" [ContentReference (EntityRef "lt")]], _parameterEntities = [], _notations = [], _instructions = []}))