factor: more top level forms.

[factor.git] / basis / unix / stat / stat.factor

diff --git a/basis/unix/stat/stat.factor b/basis/unix/stat/stat.factor
index 67efa45e9c2ad704c0fcf52b18c22aa7d9d61393..4769bd1533cb5276972531f02ba9ecbbece34ef3 100644 (file)
--- a/basis/unix/stat/stat.factor
+++ b/basis/unix/stat/stat.factor
@@ -1,5 +1,5 @@
 USING: accessors alien.c-types alien.syntax classes.struct
-kernel sequences system unix vocabs ;
+kernel sequences system unix vocabs vocabs.platforms ;
 IN: unix.stat
 
 ! File Types
@@ -21,7 +21,7 @@ STRUCT: fsid
 TYPEDEF: fsid __fsid_t
 TYPEDEF: fsid fsid_t
 
-<< "unix.stat." os name>> append require >>
+USE-OS-SUFFIX: unix.stat
 
 : file-status ( pathname -- stat )
     \ stat new [ [ stat-func ] unix-system-call drop ] keep ;