paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 21:49:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Handle FPC_USE_LIBC case for Sparc too.

Browse Source 
git-svn-id: trunk@6967 -
This commit is contained in:
daniel 2007-03-23 23:30:18 +00:00
parent 084a78fdd3
commit 3a7266a462
1 changed files with 26 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -56,7 +56,7 @@
st_ctime : cuint; st_ctime : cuint;
st_ctime_nsec : cuint; st_ctime_nsec : cuint;
__unused4_ : cuint; __unused4_ : cuint;
__unused5_ : cuint; __unused5_ : cuint);
end; end;
{$ELSE FPC_USE_LIBC} {$ELSE FPC_USE_LIBC}
@ -65,14 +65,35 @@
Stat = record Stat = record
case byte of case byte of
st_dev : cULongLong; 0:
(dev : cULongLong;
ino : cULongLong;
mode : mode_t;
nlink : nlink_t;
uid : uid_t;
gid : gid_t;
rdev : cULongLong;
__pad2 : cushort;
size : cLongLong;
blksize : cULong;
blocks : cULongLong;
atime,
atime_nsec,
mtime,
mtime_nsec,
ctime,
ctime_nsec,
__unused4,
__unused5 : cULong);
1:
(st_dev : cULongLong;
st_ino : cULongLong; st_ino : cULongLong;
st_mode : mode_t; st_mode : mode_t;
st_nlink : nlink_t; st_nlink : nlink_t;
st_uid : uid_t; st_uid : uid_t;
st_gid : gid_t; st_gid : gid_t;
st_rdev : cULongLong; st_rdev : cULongLong;
__pad2 : cushort; __pad2_ : cushort;
st_size : cLongLong; st_size : cLongLong;
st_blksize : cULong; st_blksize : cULong;
st_blocks : cULongLong; st_blocks : cULongLong;
@ -82,8 +103,8 @@
st_mtime_nsec, st_mtime_nsec,
st_ctime, st_ctime,
st_ctime_nsec, st_ctime_nsec,
__unused4, __unused4_,
__unused5 : cULong; __unused5-) : cULong);
end; end;
{$ENDIF FPC_USE_LIBC} {$ENDIF FPC_USE_LIBC}