浏览代码

* more fixes from Lloyd

marco 21 年之前
父节点
当前提交
988c22bb2d
共有 1 个文件被更改,包括 5 次插入2 次删除
  1. 5 2
      rtl/linux/unixsock.inc

+ 5 - 2
rtl/linux/unixsock.inc

@@ -128,7 +128,7 @@ end;
 
 
 function  fpsetsockopt  (s:cint; level:cint; optname:cint; optval:pointer; optlen : tsocklen):cint;
 function  fpsetsockopt  (s:cint; level:cint; optname:cint; optval:pointer; optlen : tsocklen):cint;
 begin
 begin
-  fpSetSockOpt:=SocketCall(Socket_Sys_SetSockOpt,S,optname,TSysParam(optval),optlen,0,0);
+  fpSetSockOpt:=SocketCall(Socket_Sys_SetSockOpt,S,level,optname,TSysParam(optval),optlen,0);
 end;
 end;
 
 
 function  fpgetsockopt  (s:cint; level:cint; optname:cint; optval:pointer; optlen : psocklen):cint; 
 function  fpgetsockopt  (s:cint; level:cint; optname:cint; optval:pointer; optlen : psocklen):cint; 
@@ -144,7 +144,10 @@ end;
 
 
 {
 {
  $Log$
  $Log$
- Revision 1.11  2004-03-20 15:19:29  marco
+ Revision 1.12  2004-03-22 06:49:28  marco
+  * more fixes from Lloyd
+
+ Revision 1.11  2004/03/20 15:19:29  marco
   * *BSD do_syscall was left behind. Replaced with socketcall
   * *BSD do_syscall was left behind. Replaced with socketcall
 
 
  Revision 1.10  2004/03/16 18:03:37  marco
  Revision 1.10  2004/03/16 18:03:37  marco