]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/io/directories/unix/unix.factor
factor: more top level forms.
[factor.git] / basis / io / directories / unix / unix.factor
index 32b9df10b40f1b03cacbb870b251481e43ee0862..413ec5a3ca39f7f58f8ef47a9fabeb26398f6378 100644 (file)
@@ -4,7 +4,7 @@ USING: accessors alien.c-types alien.data alien.strings assocs
 classes.struct continuations fry io.backend io.backend.unix
 io.directories io.files io.files.info io.files.info.unix
 io.files.types kernel libc literals math sequences system unix
-unix.ffi vocabs ;
+unix.ffi vocabs vocabs.platforms ;
 IN: io.directories.unix
 
 CONSTANT: touch-mode flags{ O_WRONLY O_APPEND O_CREAT O_EXCL }
@@ -77,4 +77,4 @@ M: unix (directory-entries)
         '[ _ _ next-dirent ] [ >directory-entry ] produce nip
     ] with-unix-directory ;
 
-os linux? [ "io.directories.unix.linux" require ] when
+USE-LINUX: io.directories.unix.linux
\ No newline at end of file