levelorder ( node quot: ( data -- ) -- )

Vocabulary

rosetta-code.tree-traversal

Inputs

node	an object
quot	a quotation with stack effect ( data -- )

Outputs

None

Definition

USING: dlists kernel ;

IN: rosetta-code.tree-traversal

: levelorder ( node quot: ( data -- ) -- )
    [ 1dlist ] dip (levelorder) ; inline