steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ffi work

db4
Doug Coleman 2008-10-20 02:08:33 -05:00
parent 70fb131e82
commit ff918546c1
3 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/unix/stat/linux/linux.factor
View File

@ -1,12 +1,6 @@
USING: alien.syntax layouts combinators vocabs.loader ; USING: alien.syntax layouts combinators vocabs.loader ;
IN: unix.stat IN: unix.stat
C-STRUCT: fsid
{ { "int" 2 } "__val" } ;
TYPEDEF: fsid __fsid_t
TYPEDEF: fsid fsid_t
cell-bits cell-bits
{ {
{ 32 [ "unix.stat.linux.32" require ] } { 32 [ "unix.stat.linux.32" require ] }

2
basis/unix/stat/netbsd/netbsd.factor
View File

@ -29,7 +29,7 @@ C-STRUCT: statvfs
{ "fsid_t" "f_fsidx" } { "fsid_t" "f_fsidx" }
{ "ulong" "f_fsid" } { "ulong" "f_fsid" }
{ "ulong" "f_namemax" } { "ulong" "f_namemax" }
{ "uid_t"" "f_owner" } { "uid_t" "f_owner" }
{ { "uint32_t" 4 } "f_spare" } { { "uint32_t" 4 } "f_spare" }
{ { "char" _VFS_NAMELEN } "f_fstypename" } { { "char" _VFS_NAMELEN } "f_fstypename" }
{ { "char" _VFS_NAMELEN } "f_mntonname" } { { "char" _VFS_NAMELEN } "f_mntonname" }

6
basis/unix/stat/stat.factor
View File

@ -18,6 +18,12 @@ FUNCTION: int chmod ( char* path, mode_t mode ) ;
FUNCTION: int fchmod ( int fd, mode_t mode ) ; FUNCTION: int fchmod ( int fd, mode_t mode ) ;
FUNCTION: int mkdir ( char* path, mode_t mode ) ; FUNCTION: int mkdir ( char* path, mode_t mode ) ;
C-STRUCT: fsid
{ { "int" 2 } "__val" } ;
TYPEDEF: fsid __fsid_t
TYPEDEF: fsid fsid_t
<< os { << os {
{ linux [ "unix.stat.linux" require ] } { linux [ "unix.stat.linux" require ] }
{ macosx [ "unix.stat.macosx" require ] } { macosx [ "unix.stat.macosx" require ] }