xml.writer: adding a test for pprint-xml fix.

2015-02-28 16:40:13 -08:00 · 2015-02-28 16:40:13 -08:00 · 3a12615b12
parent c7f440e097
commit 3a12615b12
1 changed files with 4 additions and 0 deletions
--- a/basis/xml/writer/writer-tests.factor
+++ b/basis/xml/writer/writer-tests.factor
@ -75,3 +75,7 @@ IN: xml.writer.tests
    ] map [XML <h2>Timings</h2> <table><-></table> XML]
    pprint-xml
 ] unit-test
+
+{ "<test name=\"bob\"/>" } [
+    "test" { { "name" "bob" } } { } <tag> xml>string
+] unit-test