]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/unix/statvfs/macosx/macosx.factor
use radix literals
[factor.git] / basis / unix / statvfs / macosx / macosx.factor
index 3b1fe71a6a8cf41f442e4578860bcbd78d2570f7..79c9b0e3137c74bc4ce9341d07cb4ac6b7dfddfc 100644 (file)
@@ -1,6 +1,6 @@
 ! Copyright (C) 2008 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: alien.syntax classes.struct ;
+USING: alien.c-types alien.syntax classes.struct unix.types ;
 IN: unix.statvfs.macosx
 
 STRUCT: statvfs
@@ -17,7 +17,7 @@ STRUCT: statvfs
     { f_namemax ulong } ;
 
 ! Flags
-CONSTANT: ST_RDONLY   HEX: 1 ! Read-only file system
-CONSTANT: ST_NOSUID   HEX: 2 ! Does not honor setuid/setgid
+CONSTANT: ST_RDONLY   0x1 ! Read-only file system
+CONSTANT: ST_NOSUID   0x2 ! Does not honor setuid/setgid
 
-FUNCTION: int statvfs ( char* path, statvfs* buf ) ;
+FUNCTION: int statvfs ( c-string path, statvfs* buf ) ;