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

* fix Fpfstat as Fpstat has been fixed in r36664, sparc64 needs explictly an stat64 call for 64 bit stat

Browse Source 
git-svn-id: trunk@36674 -
This commit is contained in:
florian 2017-07-07 22:18:14 +00:00
parent 8ce6140476
commit 47bdbb2d1f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/linux/ossysc.inc
View File

@ -340,7 +340,7 @@ function Fpsigaction(sig: cint; new_action, old_action: psigactionrec): cint; [p
If OldAct is non-nil the previous action is saved there.
}
begin
{$if defined(cpusparc) or defined(cpusparc64) }
{$if defined(cpusparc) or defined(cpusparc64)}
{ Sparc has an extra stub parameter }
Fpsigaction:=do_syscall(syscall_nr_rt_sigaction,TSysParam(sig),TSysParam(new_action),TSysParam(old_action),TSysParam(ptruint(@Fprt_sigreturn_stub)-8),TSysParam(8));
{$else cpusparc}
@ -391,7 +391,7 @@ end;
function Fpfstat(fd : cint; var sb : stat): cint; [public, alias : 'FPC_SYSC_FSTAT'];
begin
{$if defined(cpu64)}
{$if defined(cpu64) and not(defined(cpusparc64))}
{$if defined(generic_linux_syscalls)}
FpFStat:=do_SysCall(syscall_nr_fstat,TSysParam(fd),TSysParam(@sb));
{$else}