prepare-deep ( xml name/string -- tag name/string )

Vocabulary

xml.traversal.private

Inputs

xml	an object
name/string	an object

Outputs

tag	an object
name/string	an object

Definition

USING: accessors kernel xml.data ;

IN: xml.traversal.private

: prepare-deep ( xml name/string -- tag name/string )
    [ dup xml? [ body>> ] when ] [ assure-name ] bi* ;