Browse Source

+ Fixes as suggested by Den Jean

michael 20 years ago
parent
commit
7c2585e230

+ 1 - 0
packages/base/libc/signalh.inc

@@ -52,6 +52,7 @@ function sighold(__sig:longint):longint;cdecl;external clib name 'sighold';
 function sigrelse(__sig:longint):longint;cdecl;external clib name 'sigrelse';
 function sigignore(__sig:longint):longint;cdecl;external clib name 'sigignore';
 function sigset(__sig:longint; __disp:__sighandler_t):__sighandler_t;cdecl;external clib name 'sigset';
+function sigaction(__sig: longint; Action: PSigAction; OldAction: PSigAction): Integer; external clib name 'sigaction';
 
 function __libc_current_sigrtmin:longint;cdecl;external clib name '__libc_current_sigrtmin';
 function __libc_current_sigrtmax:longint;cdecl;external clib name '__libc_current_sigrtmax';

+ 3 - 1
packages/base/libc/sresourceh.inc

@@ -18,4 +18,6 @@ function setpriority(__which:__priority_which_t; __who:id_t; __prio:longint):lon
     Borland compatibility types
   ---------------------------------------------------------------------}
 
-// Type  
+// Type 
+
+Function setrlimit (__resource: __rlimit_resource_t; const __rlimits: TRLimit): longint; cdecl; external clib name 'setrlimit';

+ 1 - 0
packages/base/libc/sucontexth.inc

@@ -82,5 +82,6 @@ type
 
 Type  
   TUserContext = ucontext_t;
+  PUserContext = ^TUserContext;
   
   

+ 1 - 1
packages/base/libc/unistdh.inc

@@ -101,7 +101,7 @@ procedure _exit (__status : longint); cdecl; external clib name '_exit';
 function pathconf(__path:Pchar; __name:longint):longint;cdecl;external clib name 'pathconf';
 function fpathconf(__fd:longint; __name:longint):longint;cdecl;external clib name 'fpathconf';
 
-function sysconf (__name : longint) : longint; cdecl; external clib name 'syconf';
+function sysconf (__name : longint) : longint; cdecl; external clib name 'sysconf';
 function confstr(__name:longint; __buf:Pchar; __len:size_t):size_t;cdecl;external clib name 'confstr';
 
 function getpid:__pid_t;cdecl;external clib name 'getpid';