Vocabulary
io.directories.search.private

Inputs and outputs
iteran object
quota quotation with stack effect ( ... obj -- ... obj )
directory-entry/fan object


Definition


:: iterate-directory-entries
( ... iter quot: ( ... obj -- ... obj ) -- ... directory-entry/f )
iter next-directory-entry [
quot call
[ iter quot iterate-directory-entries ] unless*
] [ f ] if* ; inline recursive