factor/basis/io/directories/unix/linux/linux.factor

! Copyright (C) 2009 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: alien.c-types alien.data io.directories.unix kernel
system unix classes.struct unix.ffi ;
IN: io.directories.unix.linux

M: linux find-next-file ( DIR* -- dirent )
    dirent <struct>
    f void* <ref>
    [ [ readdir64_r ] unix-system-call 0 = [ (io-error) ] unless ] 2keep
    void* deref [ drop f ] unless ;
fix bootstrap errors, add missing files 2009-05-07 17:53:32 -04:00			`! Copyright (C) 2009 Doug Coleman.`
			`! See http://factorcode.org/license.txt for BSD license.`
Move <ref>, deref and little-endian? from alien.c-types to alien.data, remove <c-object> 2010-12-25 19:54:45 -05:00			`USING: alien.c-types alien.data io.directories.unix kernel`
			`system unix classes.struct unix.ffi ;`
fix bootstrap errors, add missing files 2009-05-07 17:53:32 -04:00			`IN: io.directories.unix.linux`

Small cleanups 2010-02-15 10:04:09 -05:00			`M: linux find-next-file ( DIR* -- dirent )`
make a struct for dirents on linux, not a <c-object> 2009-08-30 23:49:35 -04:00			`dirent <struct>`
Remove usages of <void> and void* 2010-10-25 14:22:50 -04:00			`f void* <ref>`
Make unix-system-call retry the call immediately upon hitting EINTR. Use unix-system-call wherever EAGAIN or EINPROGRESS are not handled. Handle EINTR if connect returns it. 2010-01-19 17:53:15 -05:00			`[ [ readdir64_r ] unix-system-call 0 = [ (io-error) ] unless ] 2keep`
Remove usages of <void> and void* 2010-10-25 14:22:50 -04:00			`void* deref [ drop f ] unless ;`