hextream-0.3.0.0: test/sgml.xml.high.golden
Right
[ TokenProlog
( Prolog
{ prologXmlDeclaration = Just
( XMLDeclaration "1.0"
( Just "utf-8" ) Nothing
)
, prologInstructions = []
, prologDoctype = Just
( Doctype "sgml" Nothing
( InternalSubset
{ _elementTypes =
[ ElementType "sgml" ContentAny ]
, _attributeLists = []
, _generalEntities = []
, _parameterEntities =
[ ParameterEntity "std"
[ ValueText "standard SGML" ]
, ParameterEntity "signature"
[ ValueText " "
, ValueReference
( CharRef '\8212' )
, ValueText " "
, ValueReference
( EntityRef "author" )
, ValueText "."
]
, ParameterEntity "question"
[ ValueText "Why couldn"
, ValueReference
( CharRef '\8217' )
, ValueText "t I publish my books directly in "
, ValueParameterEntityRef
( ParameterEntityRef "std" )
, ValueText "?"
]
, ParameterEntity "author"
[ ValueText "William Shakespeare" ]
]
, _notations = []
, _instructions = []
}
)
)
}
)
, TokenTextContent "
"
]