From c026702390495bfa127c4a962367642ede87dbb3 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Tue, 12 May 2009 18:04:22 -0500 Subject: [PATCH] fix stat on 64bit linux --- basis/unix/stat/linux/64/64.factor | 36 ++++++++++++++++-------------- 1 file changed, 19 insertions(+), 17 deletions(-) diff --git a/basis/unix/stat/linux/64/64.factor b/basis/unix/stat/linux/64/64.factor index 98c4b90f32..581525dda0 100644 --- a/basis/unix/stat/linux/64/64.factor +++ b/basis/unix/stat/linux/64/64.factor @@ -2,24 +2,26 @@ USING: kernel alien.syntax math sequences unix alien.c-types arrays accessors combinators ; IN: unix.stat -! stat64 +! Ubuntu 7.10 64-bit + C-STRUCT: stat - { "dev_t" "st_dev" } - { "ushort" "__pad1" } - { "__ino_t" "__st_ino" } - { "mode_t" "st_mode" } - { "nlink_t" "st_nlink" } - { "uid_t" "st_uid" } - { "gid_t" "st_gid" } - { "dev_t" "st_rdev" } - { { "ushort" 2 } "__pad2" } - { "off64_t" "st_size" } - { "blksize_t" "st_blksize" } - { "blkcnt64_t" "st_blocks" } - { "timespec" "st_atimespec" } - { "timespec" "st_mtimespec" } - { "timespec" "st_ctimespec" } - { "ulonglong" "st_ino" } ; + { "dev_t" "st_dev" } + { "ino_t" "st_ino" } + { "nlink_t" "st_nlink" } + { "mode_t" "st_mode" } + { "uid_t" "st_uid" } + { "gid_t" "st_gid" } + { "int" "pad0" } + { "dev_t" "st_rdev" } + { "off64_t" "st_size" } + { "blksize_t" "st_blksize" } + { "blkcnt64_t" "st_blocks" } + { "timespec" "st_atimespec" } + { "timespec" "st_mtimespec" } + { "timespec" "st_ctimespec" } + { "long" "__unused0" } + { "long" "__unused1" } + { "long" "__unused2" } ; FUNCTION: int __xstat64 ( int ver, char* pathname, stat* buf ) ; FUNCTION: int __lxstat64 ( int ver, char* pathname, stat* buf ) ;