diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/automated/xml-parse-tests.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/test/automated/xml-parse-tests.el b/test/automated/xml-parse-tests.el index 8e8ef291bdc..8322a8c6ff9 100644 --- a/test/automated/xml-parse-tests.el +++ b/test/automated/xml-parse-tests.el | |||
| @@ -38,7 +38,10 @@ | |||
| 38 | ((foo ((a . "b")) (bar nil "AbC;")))) | 38 | ((foo ((a . "b")) (bar nil "AbC;")))) |
| 39 | ;; Tricky parameter entity substitution (like XML spec Appendix D) | 39 | ;; Tricky parameter entity substitution (like XML spec Appendix D) |
| 40 | ("<?xml version='1.0'?><!DOCTYPE foo [ <!ENTITY % xx '%zz;'><!ENTITY % zz '<!ENTITY ent \"b\" >' > %xx; ]><foo>A&ent;C</foo>" . | 40 | ("<?xml version='1.0'?><!DOCTYPE foo [ <!ENTITY % xx '%zz;'><!ENTITY % zz '<!ENTITY ent \"b\" >' > %xx; ]><foo>A&ent;C</foo>" . |
| 41 | ((foo nil "AbC")))) | 41 | ((foo nil "AbC"))) |
| 42 | ;; Bug#7172 | ||
| 43 | ("<?xml version=\"1.0\"?><!DOCTYPE foo [ <!ELEMENT EXAM_PLE EMPTY> ]><foo></foo>" . | ||
| 44 | ((foo nil)))) | ||
| 42 | "Alist of XML strings and their expected parse trees.") | 45 | "Alist of XML strings and their expected parse trees.") |
| 43 | 46 | ||
| 44 | (ert-deftest xml-parse-tests () | 47 | (ert-deftest xml-parse-tests () |