paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-17 13:39:36 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ Fixed declaration of sisigemptyset and friends to use param by ref

Browse Source 
git-svn-id: trunk@3508 -
This commit is contained in:
michael 2006-05-13 20:25:10 +00:00
parent ae740894a3
commit 67b440333d
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
packages/base/libc/signalh.inc
View File

@ -67,14 +67,14 @@ Type
PSigVec = ^TSigVec;
function sigemptyset(SigSet : TSigSet):longint;cdecl;external clib name 'sigemptyset';
function sigfillset(SigSet : TSigSet):longint;cdecl;external clib name 'sigfillset';
function sigaddset(SigSet : TSigSet; SigNum : Longint):longint;cdecl;external clib name 'sigaddset';
function sigdelset(SigSet : TSigSet; SigNum : Longint):longint;cdecl;external clib name 'sigdelset';
function sigismember(SigSet : TSigSet; SigNum : Longint):longint;cdecl;external clib name 'sigismember';
function sigisemptyset(SigSet : TSigSet):longint;cdecl;external clib name 'sigisemptyset';
function sigandset(SigSet : TSigSet; const Left : TSigSet; const Right : TSigSet):longint;cdecl;external clib name 'sigandset';
function sigorset(SigSet : TSigSet; const Left : TSigSet; const Right : TSigSet):longint;cdecl;external clib name 'sigorset';
function sigemptyset(var SigSet : TSigSet):longint;cdecl;external clib name 'sigemptyset';
function sigfillset(var SigSet : TSigSet):longint;cdecl;external clib name 'sigfillset';
function sigaddset(var SigSet : TSigSet; SigNum : Longint):longint;cdecl;external clib name 'sigaddset';
function sigdelset(var SigSet : TSigSet; SigNum : Longint):longint;cdecl;external clib name 'sigdelset';
function sigismember(const SigSet : TSigSet; SigNum : Longint):longint;cdecl;external clib name 'sigismember';
function sigisemptyset(const SigSet : TSigSet):longint;cdecl;external clib name 'sigisemptyset';
function sigandset(var SigSet : TSigSet; const Left : TSigSet; const Right : TSigSet):longint;cdecl;external clib name 'sigandset';
function sigorset(var SigSet : TSigSet; const Left : TSigSet; const Right : TSigSet):longint;cdecl;external clib name 'sigorset';
function sigprocmask(__how:longint; SigSet : TSigSet; var oldset: Tsigset):longint;cdecl;external clib name 'sigprocmask';
function sigsuspend(SigSet : TSigSet):longint;cdecl;external clib name 'sigsuspend';
function sigaction(__sig:longint; Const act: _sigaction; Var oldact: _sigaction):longint;cdecl;external clib name 'sigaction';