Jelajahi Sumber

* fix type of fourth parameter of msgrcv function

git-svn-id: trunk@16409 -
pierre 14 tahun lalu
induk
melakukan
889caf5911
1 mengubah file dengan 1 tambahan dan 1 penghapusan
  1. 1 1
      rtl/bsd/ipcbsd.inc

+ 1 - 1
rtl/bsd/ipcbsd.inc

@@ -80,7 +80,7 @@ begin
   msgsnd:=do_syscall(syscall_nr_msgsys,2, msqid, TSysParam(msgp), TSysParam(msgsz), msgflg);
 end;
 
-Function msgrcv(msqid:cint; msgp: PMSGBuf; msgsz: size_t; msgtyp:cint; msgflg:cint):cint;
+Function msgrcv(msqid:cint; msgp: PMSGBuf; msgsz: size_t; msgtyp:clong; msgflg:cint):cint;
 begin
   msgrcv:=(do_syscall(syscall_nr_msgsys,3, msqid, TSysParam(msgp), msgsz, msgtyp, msgflg));
 end;