steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

io.directories.search: Show directory entries instead of throwing them away.

db4
Doug Coleman 2013-04-13 15:49:03 -07:00
parent e501f61141
commit 7a35d85f30
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/io/directories/search/search.factor
View File

@ -38,7 +38,7 @@ TUPLE: directory-iterator path bfs queue ;
dup queue>> deque-empty? [ drop f ] [ dup queue>> deque-empty? [ drop f ] [
dup queue>> pop-back dup queue>> pop-back
dup directory? dup directory?
[ name>> over push-directory-entries next-directory-entry ] [ [ name>> swap push-directory-entries ] keep ]
[ nip ] if [ nip ] if
] if ; ] if ;