remove openbsd shiz

Doug Coleman 2008-10-20 23:23:17 -05:00
parent ce84be5f23
commit f40fc145de
4 changed files with 1 additions and 14 deletions

View File

@ -142,9 +142,7 @@ os {
[ opendir dup [ (io-error) ] unless ] dip
dupd curry swap '[ _ closedir io-error ] [ ] cleanup ; inline
HOOK: find-next-file os ( DIR* -- byte-array )
M: unix find-next-file ( DIR* -- byte-array )
: find-next-file ( DIR* -- byte-array )
"dirent" <c-object>
f <void*>
[ readdir_r 0 = [ (io-error) ] unless ] 2keep
@ -161,8 +159,6 @@ M: unix (directory-entries) ( path -- seq )
[ drop ] produce
] with-unix-directory ;
os openbsd = [ "io.unix.files.openbsd" require ] when
<PRIVATE
: stat-mode ( path -- mode )

View File

@ -1 +0,0 @@
Doug Coleman

View File

@ -1,7 +0,0 @@
! Copyright (C) 2005, 2008 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: unix system ;
IN: io.unix.files
M: openbsd find-next-file ( DIR* -- byte-array )
readdir ;

View File

@ -1 +0,0 @@
unportable