فهرست منبع

* Fopefully last fix for non-select platforms

Michaël Van Canneyt 3 سال پیش
والد
کامیت
cb22b7a1d5
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  1. 1 1
      packages/fcl-net/src/ssockets.pp

+ 1 - 1
packages/fcl-net/src/ssockets.pp

@@ -603,8 +603,8 @@ var
 
 
 begin
 begin
   Result:=False;
   Result:=False;
-  MaxHandle:=0;
 {$if defined(unix) or defined(windows)}
 {$if defined(unix) or defined(windows)}
+  MaxHandle:=0;
   TimeV.tv_usec := (aTimeOut mod 1000) * 1000;
   TimeV.tv_usec := (aTimeOut mod 1000) * 1000;
   TimeV.tv_sec := aTimeOut div 1000;
   TimeV.tv_sec := aTimeOut div 1000;
   FillFD(FDR,aRead);
   FillFD(FDR,aRead);