setup-traversal ( path quot -- iter quot' )


Vocabulary
io.directories.private

Inputs
pathan object
quotan object


Outputs
iteran object
quot'an object


Definition
USING: kernel ;

IN: io.directories.private

: setup-traversal ( path quot -- iter quot' )
[ bfs? <directory-iterator> ] dip [ f ] compose ; inline