undo-xml ( xml -- quot )

Vocabulary

xml.syntax.inverse

Inputs

xml

an object

Outputs

quot

an object

Definition

USING: kernel namespaces ;

IN: xml.syntax.inverse

: undo-xml ( xml -- quot )
    [undo-xml] [ with-variables ] curry [ [ H{ } clone ] ] dip
    [ keep >enum ] curry compose ;