]> gitweb.factorcode.org Git - factor.git/blob - basis/unix/stat/netbsd/64/64.factor
47c4e0c129f58d3a8c0cae47b907b5976e3377a2
[factor.git] / basis / unix / stat / netbsd / 64 / 64.factor
1 USING: kernel alien.c-types alien.syntax math classes.struct
2 unix.time unix.types ;
3 IN: unix.stat
4
5 ! NetBSD 4.0
6
7 STRUCT: stat
8     { st_dev dev_t }
9     { st_ino ino_t }
10     { st_mode mode_t }
11     { st_nlink nlink_t }
12     { st_uid uid_t }
13     { st_gid gid_t }
14     { st_rdev dev_t }
15     { st_atimespec timespec }
16     { st_mtimespec timespec }
17     { st_ctimespec timespec }
18     { st_size off_t }
19     { st_blocks blkcnt_t }
20     { st_blksize blksize_t }
21     { st_flags uint32_t }
22     { st_gen uint32_t }
23     { st_spare0 uint32_t }
24     { st_birthtimespec timespec } ;
25
26 FUNCTION: int __stat13 ( char* pathname, stat* buf ) ;
27 FUNCTION: int __lstat13 ( char* pathname, stat* buf ) ;
28
29 : stat ( pathname buf -- n ) __stat13 ;
30 : lstat ( pathname buf -- n ) __lstat13 ;