Browse Source

* Allow to compile also non-windows,linux

Michaël Van Canneyt 4 years ago
parent
commit
58b252705e
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/fcl-net/src/ssockets.pp

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

@@ -393,8 +393,8 @@ var
 {$endif}
 begin
   Result:=[];
-  Res:=-1;
 {$if defined(unix) or defined(windows)}
+  Res:=-1;
   TimeV.tv_usec := (TimeOut mod 1000) * 1000;
   TimeV.tv_sec := TimeOut div 1000;
   DoSet(FDSR,PFDSR,sosCanRead);