diff --git a/basis/io/unix/files/files.factor b/basis/io/unix/files/files.factor index 2b85420ee9..67da640b71 100644 --- a/basis/io/unix/files/files.factor +++ b/basis/io/unix/files/files.factor @@ -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" f [ 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 -