paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-05 03:11:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Make sparc/linux stat structure backward compatible too.

Browse Source 
git-svn-id: trunk@6966 -
This commit is contained in:
daniel 2007-03-23 23:24:12 +00:00
parent ae15527637
commit 084a78fdd3
1 changed files with 42 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

62
rtl/linux/sparc/stat.inc
View File

@ -15,26 +15,48 @@
{$IFNDEF FPC_USE_LIBC}
Stat = packed record // No unix typing because of differences
st_dev : culonglong;
st_ino : culonglong;
st_mode : cuint;
st_nlink : cuint;
st_uid : cuint;
st_gid : cuint;
st_rdev : culonglong;
__pad3 : array[0..7] of cuchar;
st_size : clonglong;
st_blksize: cuint;
__pad4 : array[0..7] of cuchar;
st_blocks : cuint;
st_atime : cuint;
st_atime_nsec : cuint;
st_mtime : cuint;
st_mtime_nsec : cuint;
st_ctime : cuint;
st_ctime_nsec : cuint;
__unused4 : cuint;
__unused5 : cuint;
0:
(dev : culonglong;
ino : culonglong;
mode : cuint;
nlink : cuint;
uid : cuint;
gid : cuint;
rdev : culonglong;
__pad3 : array[0..7] of cuchar;
size : clonglong;
blksize: cuint;
__pad4 : array[0..7] of cuchar;
blocks : cuint;
atime : cuint;
atime_nsec : cuint;
mtime : cuint;
mtime_nsec : cuint;
ctime : cuint;
ctime_nsec : cuint;
__unused4 : cuint;
__unused5 : cuint);
1:
(st_dev : culonglong;
st_ino : culonglong;
st_mode : cuint;
st_nlink : cuint;
st_uid : cuint;
st_gid : cuint;
st_rdev : culonglong;
__pad3_ : array[0..7] of cuchar;
st_size : clonglong;
st_blksize: cuint;
__pad4_ : array[0..7] of cuchar;
st_blocks : cuint;
st_atime : cuint;
st_atime_nsec : cuint;
st_mtime : cuint;
st_mtime_nsec : cuint;
st_ctime : cuint;
st_ctime_nsec : cuint;
__unused4_ : cuint;
__unused5_ : cuint;
end;
{$ELSE FPC_USE_LIBC}