فهرست منبع

* Fix parameter type for sigsuspend syscall for OpenBSD

git-svn-id: trunk@19609 -
pierre 13 سال پیش
والد
کامیت
3f4dd5ac9b
1فایلهای تغییر یافته به همراه5 افزوده شده و 0 حذف شده
  1. 5 0
      rtl/bsd/bunxsysc.inc

+ 5 - 0
rtl/bsd/bunxsysc.inc

@@ -47,7 +47,12 @@ function FPsigsuspend(const sigmask:sigset_t):cint;
 }
 
 begin
+{$ifdef OPENBSD}
+  { OpenBSD sigsuspend syscall wants a simple int as arg }
+  FPsigsuspend:= do_syscall(syscall_nr_sigsuspend,TSysParam(sigmask[0]));
+{$else}
   FPsigsuspend:= do_syscall(syscall_nr_sigsuspend,TSysParam(@sigmask));
+{$endif}
 end;
 
 {$ifndef FPC_SYS_SIGTIMEDWAIT_UNAVAILABLE}