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

fix using

db4
Doug Coleman 2009-08-31 12:20:56 -05:00
parent 0bcd7c2619
commit 6ac21a8cf9
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
basis/io/files/info/unix/openbsd/openbsd.factor
View File

@ -4,7 +4,7 @@ USING: accessors alien.c-types alien.strings alien.syntax
combinators io.backend io.files io.files.info io.files.unix kernel math combinators io.backend io.files io.files.info io.files.unix kernel math
sequences system unix unix.getfsstat.openbsd grouping sequences system unix unix.getfsstat.openbsd grouping
unix.statfs.openbsd unix.statvfs.openbsd unix.types unix.statfs.openbsd unix.statvfs.openbsd unix.types
arrays io.files.info.unix classes.struct ; arrays io.files.info.unix classes.struct io.encodings.utf8 ;
IN: io.files.unix.openbsd IN: io.files.unix.openbsd
TUPLE: freebsd-file-system-info < unix-file-system-info TUPLE: freebsd-file-system-info < unix-file-system-info
@ -34,9 +34,9 @@ M: openbsd statfs>file-system-info ( file-system-info statfs -- file-system-info
[ f_fsid>> >>id ] [ f_fsid>> >>id ]
[ f_namemax>> >>name-max ] [ f_namemax>> >>name-max ]
[ f_owner>> >>owner ] [ f_owner>> >>owner ]
[ f_fstypename>> alien>native-string >>type ] [ f_fstypename>> utf8 alien>string >>type ]
[ f_mntonname>> alien>native-string >>mount-point ] [ f_mntonname>> utf8 alien>string >>mount-point ]
[ f_mntfromname>> alien>native-string >>device-name ] [ f_mntfromname>> utf8 alien>string >>device-name ]
} cleave ; } cleave ;
M: openbsd file-system-statvfs ( normalized-path -- statvfs ) M: openbsd file-system-statvfs ( normalized-path -- statvfs )