#N canvas 438 13 535 566 10; #X msg 89 227 close; #X msg 52 79 bang; #X msg 83 160 tell; #X obj 38 322 print dir-entry; #X obj 82 294 print end-of-directory; #X text 130 8 readdir : simple directory accessor; #X text 231 543 Bryan Jurish ; #X text 157 46 open DIR : opens the directory DIR; #X text 185 75 bang : outlet next directory entry; #X text 185 91 next : ditto; #X msg 59 101 next; #X msg 71 137 rewind; #X text 173 137 rewind : return to beginning of directory; #X text 188 158 tell : output current position; #X text 146 182 seek FLOAT : goto position FLOAT; #X msg 86 184 seek 0; #X text 181 223 close : close directory; #X text 258 295 2nd outlet bangs at end of directory; #X text 260 325 Directory entries go to 1st outlet; #X text 39 370 Directory entries appear as messages of the form TYPE NAME \, where NAME is the name of the entry \, and TYPE is one of the following:; #X text 65 515 unknown : something else; #X text 87 419 file : regular file; #X text 93 434 dir : subdirectory; #X text 86 450 fifo : named pipe; #X text 85 466 sock : local-domain socket; #X text 71 482 chrdev : character device; #X text 71 498 blkdev : block device; #X obj 38 267 readdir; #X msg 39 47 open /tmp; #X connect 0 0 27 0; #X connect 1 0 27 0; #X connect 2 0 27 0; #X connect 10 0 27 0; #X connect 11 0 27 0; #X connect 15 0 27 0; #X connect 27 0 3 0; #X connect 27 1 4 0; #X connect 28 0 27 0;