process ( object -- )

Vocabulary

xml.private

Inputs

object

an object

Outputs

None

Definition

IN: xml.private

GENERIC: process ( object -- )

Methods

USING: accessors kernel sequences xml.data xml.private ;

M: closer process
    name>> pop-xml first2 [ check-closer attrs>> ] dip <tag>
    add-child ;


USING: accessors kernel xml.data xml.private ;

M: contained process
    [ name>> ] [ attrs>> ] bi <contained-tag> add-child ;


USING: kernel xml.data xml.errors xml.private ;

M: directive process
    before-main? [ misplaced-directive ] unless add-child ;


USING: kernel xml.private ;

M: object process add-child ;


USING: xml.data xml.private ;

M: opener process push-xml ;


USING: kernel namespaces sequences xml.data xml.errors
xml.private xml.state ;

M: prolog process
    xml-stack get { V{ { f V{ "" } } } V{ { f V{ } } } } member?
    [ bad-prolog ] unless add-child ;