瀏覽代碼

* 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
   Result:=False;
-  MaxHandle:=0;
 {$if defined(unix) or defined(windows)}
+  MaxHandle:=0;
   TimeV.tv_usec := (aTimeOut mod 1000) * 1000;
   TimeV.tv_sec := aTimeOut div 1000;
   FillFD(FDR,aRead);