]> Git — Sourcephile - haskell/symantic-xml.git/blob - test/Golden/XML/0004.xml.read
XML: fix union of EscapedText
[haskell/symantic-xml.git] / test / Golden / XML / 0004.xml.read
1 (NodeElem doc) @(test/Golden/XML/0004.xml#1:1-3:7 :| [])
2 |
3 +- (NodeText (EscapedText (fromList [EscapedPlain "\r\n"]))) @(test/Golden/XML/0004.xml#1:6-2:1 :| [])
4 |
5 +- (NodeElem a) @(test/Golden/XML/0004.xml#2:1-2:19 :| [])
6 | |
7 | `- (NodeElem b) @(test/Golden/XML/0004.xml#2:4-2:15 :| [])
8 | |
9 | `- (NodeElem c) @(test/Golden/XML/0004.xml#2:7-2:11 :| [])
10 |
11 `- (NodeText (EscapedText (fromList [EscapedPlain "\r\n"]))) @(test/Golden/XML/0004.xml#2:19-3:1 :| [])
12