traverse-child ( frompath topath gadget -- )

Vocabulary

ui.traverse

Inputs

frompath	an object
topath	an object
gadget	an object

Outputs

None

Definition

USING: make sequences ;

IN: ui.traverse

:: traverse-child ( frompath topath gadget -- )
    gadget [
        frompath rest-slice topath gadget traverse-step
        gadget-subtree%
    ] make-node , ;