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

* Fix hidden parameter for fpsigprocmask for mips cpu (16 instead of 8)

Browse Source 
git-svn-id: trunk@21723 -
This commit is contained in:
pierre 2012-06-26 23:13:27 +00:00
parent a3bc5eaa3f
commit 0cea493014
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/linux/ossysc.inc
View File

@ -576,7 +576,14 @@ function FPSigProcMask(how:cint;nset : psigset;oset : psigset):cint; [public, al
}
begin
FPsigprocmask:=do_syscall(syscall_nr_rt_sigprocmask,TSysParam(how),TSysParam(nset),TSysParam(oset),TSysParam(8));
FPsigprocmask:=do_syscall(syscall_nr_rt_sigprocmask,TSysParam(how),
TSysParam(nset),TSysParam(oset),
{$ifdef CPUMIPS}
TSysParam(16)
{$else not CPUMIPS}
TSysParam(8)
{$endif not CPUMIPS}
);
end;
Function FpNanoSleep(req : ptimespec;rem : ptimespec):cint; [public, alias : 'FPC_SYSC_NANOSLEEP'];