>bfs-alist ( tree -- alist )

Vocabulary

trees.private

Inputs

tree

an object

Outputs

alist

an object

Definition

USING: assocs kernel sequences vectors ;

IN: trees.private

: >bfs-alist ( tree -- alist )
    dup assoc-size <vector>
    [ [ push ] curry each-bfs-node ] keep ;