paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-16 10:19:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Make ARM stat structure backwards compatible too.

Browse Source 
git-svn-id: trunk@6965 -
This commit is contained in:
daniel 2007-03-23 23:10:09 +00:00
parent 8127fb7a05
commit ae15527637
1 changed files with 41 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

60
rtl/linux/arm/stat.inc
View File

@ -13,24 +13,46 @@
**********************************************************************}
Stat = packed record // No unix typing because of differences
st_dev : culonglong;
__pad0 : array[0..3] of cuchar;
__st_ino : culong;
st_mode : cuint;
st_nlink : cuint;
st_uid : culong;
st_gid : culong;
st_rdev : culonglong;
__pad3 : array[0..3] of cuchar;
st_size : culonglong;
st_blksize: culong;
st_blocks : culonglong;
st_atime : culong;
st_atime_nsec : culong;
st_mtime : culong;
st_mtime_nsec : culong;
st_ctime : culong;
st_ctime_nsec : culong;
st_ino : culonglong;
case byte of
0:
(dev : culonglong;
__pad0 : array[0..3] of cuchar;
__st_ino : culong;
mode : cuint;
nlink : cuint;
uid : culong;
gid : culong;
rdev : culonglong;
__pad3 : array[0..3] of cuchar;
size : culonglong;
blksize: culong;
blocks : culonglong;
atime : culong;
atime_nsec : culong;
mtime : culong;
mtime_nsec : culong;
ctime : culong;
ctime_nsec : culong;
ino : culonglong;)
1:
(st_dev : culonglong;
__pad0_ : array[0..3] of cuchar;
__st_ino_ : culong;
st_mode : cuint;
st_nlink : cuint;
st_uid : culong;
st_gid : culong;
st_rdev : culonglong;
__pad3_ : array[0..3] of cuchar;
st_size : culonglong;
st_blksize: culong;
st_blocks : culonglong;
st_atime : culong;
st_atime_nsec : culong;
st_mtime : culong;
st_mtime_nsec : culong;
st_ctime : culong;
st_ctime_nsec : culong;
st_ino : culonglong);
end;