slurp-tree-right ( tree quot: ( ... entry -- ... ) -- ... )
Binary search trees

Prev:

slurp-tree-left ( tree quot: ( ... entry -- ... ) -- ... )

Vocabulary
trees

Inputs

tree	a tree
quot	a quotation with stack effect ( ... entry -- ... )

Outputs
None

Word description
Removes entries from a tree from the right (highest key) and processes them with the quotation until the tree is empty.

See also
slurp-tree-left

Definition

USING: trees.private ;

IN: trees

: slurp-tree-right
    ( tree quot: ( ... entry -- ... ) -- ... )
    [ pop-tree-right ] slurp-tree ; inline