瀏覽代碼

* add cdecl for sigaction

peter 20 年之前
父節點
當前提交
54ca3d4536
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/base/libc/signalh.inc

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

@@ -52,7 +52,7 @@ function sighold(__sig:longint):longint;cdecl;external clib name 'sighold';
 function sigrelse(__sig:longint):longint;cdecl;external clib name 'sigrelse';
 function sigrelse(__sig:longint):longint;cdecl;external clib name 'sigrelse';
 function sigignore(__sig:longint):longint;cdecl;external clib name 'sigignore';
 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 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 sigaction(__sig: longint; Action: PSigAction; OldAction: PSigAction): Integer; cdecl;external clib name 'sigaction';
 
 
 function __libc_current_sigrtmin:longint;cdecl;external clib name '__libc_current_sigrtmin';
 function __libc_current_sigrtmin:longint;cdecl;external clib name '__libc_current_sigrtmin';
 function __libc_current_sigrtmax:longint;cdecl;external clib name '__libc_current_sigrtmax';
 function __libc_current_sigrtmax:longint;cdecl;external clib name '__libc_current_sigrtmax';