write-children ( tag -- ) - Factor Documentation

write-children ( tag -- )

Vocabulary
xml .writer .private

Inputs

tag an object

Outputs
None

Definition

USING: accessors sequences xml.writer ;

IN: xml.writer.private

: write-children ( tag -- )
indent children>> ?filter-children [ write-xml ] each
unindent ;