Merge branch 'master' of git://factorcode.org/git/factor
[factor/jcg.git] / basis / xml / generator / generator-tests.factor
blob17f7cab509c9af187b3a6bde2fd290131790f39e
1 USING: tools.test io.streams.string xml.generator xml.writer accessors ;
2 [ "<html><body><a href=\"blah\"/></body></html>" ]
3 [ "html" [ "body" [ "a" { { "href" "blah" } } contained*, ] tag, ] make-xml [ body>> write-xml-chunk ] with-string-writer ] unit-test