class test markup text
import ideal • machine • channels • string writer
testcase test writer trivial()
the writer : string writer • new()
assert "<p>\n foo\n</p>\n" == the writer • elements()
testcase test quoted()
the writer : string writer • new()
assert "AT&T <etc.> q1:' q2:"" == the writer • elements()
testcase test writer indent()
the writer : string writer • new()
assert "<p>\n foo\n</p>\n<indent>\n bar\n</indent>\n" == the writer • elements()
testcase test attribute()
the writer : string writer • new()
the formatter • write(base element • make(text library • P, text library • NAME, "foo" !> base string, "bar" !> base string))
assert "<p name='foo'>\n bar\n</p>\n" == the writer • elements()
testcase test self closing tag()
the writer : string writer • new()
the formatter • write(base element • make(text library • BR, text library • CLEAR, "all" !> base string, missing • instance))
assert "foo<br clear='all' />\nbar\n" == the writer • elements()
testcase test writer fragment()
the writer : string writer • new()
assert "one·two" == the writer • elements()