#N canvas 438 13 543 650 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 245 617 Bryan Jurish <moocow@ling.uni-potsdam.de>;
#X text 157 46 open DIR : opens the directory DIR;
#X text 185 80 bang : outlet next directory entry;
#X text 185 101 next : ditto;
#X msg 59 101 next;
#X msg 71 137 rewind;
#X text 173 137 rewind : return to beginning of directory;
#X text 187 160 tell : output current position;
#X text 146 185 seek FLOAT : goto position FLOAT;
#X msg 86 184 seek 0;
#X text 181 229 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 87 416 file : regular file;
#X text 94 429 dir : subdirectory;
#X text 87 442 fifo : named pipe;
#X text 87 455 sock : local-domain socket;
#X text 73 468 chrdev : character device;
#X text 73 482 blkdev : block device;
#X obj 38 267 readdir;
#X msg 39 47 open /tmp;
#X text 66 495 unknown : something else (maybe a symlink);
#X text 45 530 WARNING:;
#X text 59 544 Recognition of directory entry types does NOT work on
windows or any other system whose `dirent' struct is missing the `d_type'
field. On such systems \, the TYPE selector on the first outlet is
always the symbol `unknown'.;
#X connect 0 0 26 0;
#X connect 1 0 26 0;
#X connect 2 0 26 0;
#X connect 10 0 26 0;
#X connect 11 0 26 0;
#X connect 15 0 26 0;
#X connect 26 0 3 0;
#X connect 26 1 4 0;
#X connect 27 0 26 0;