From f40fc145de0051bdf5bb98da89e66472874f8650 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Mon, 20 Oct 2008 23:23:17 -0500 Subject: [PATCH] remove openbsd shiz --- basis/io/unix/files/files.factor | 6 +----- basis/io/unix/files/openbsd/authors.txt | 1 - basis/io/unix/files/openbsd/openbsd.factor | 7 ------- basis/io/unix/files/openbsd/tags.txt | 1 - 4 files changed, 1 insertion(+), 14 deletions(-) delete mode 100644 basis/io/unix/files/openbsd/authors.txt delete mode 100644 basis/io/unix/files/openbsd/openbsd.factor delete mode 100644 basis/io/unix/files/openbsd/tags.txt 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 -