Browse Source

* sigprocmask 2nd arg needs to be by ref. VAR added.

git-svn-id: trunk@11517 -
marco 17 years ago
parent
commit
96e7327d6a
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/libc/src/signalh.inc

+ 1 - 1
packages/libc/src/signalh.inc

@@ -75,7 +75,7 @@ function sigismember(const SigSet : TSigSet; SigNum : Longint):longint;cdecl;ext
 function sigisemptyset(const SigSet : TSigSet):longint;cdecl;external clib name 'sigisemptyset';
 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 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 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 sigprocmask(__how:longint; var SigSet : TSigSet; var oldset: Tsigset):longint;cdecl;external clib name 'sigprocmask';
 function sigsuspend(SigSet : TSigSet):longint;cdecl;external clib name 'sigsuspend';
 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';
 function sigaction(__sig:longint; Const act: _sigaction; Var oldact: _sigaction):longint;cdecl;external clib name 'sigaction';
 function sigpending(SigSet : TSigSet):longint;cdecl;external clib name 'sigpending';
 function sigpending(SigSet : TSigSet):longint;cdecl;external clib name 'sigpending';