* Fixed unix compilation

packages/fcl-net/src/fpsockets.pp

@@ -580,11 +580,15 @@ var
   addr: TAddressUnion;
 const
   {$IFDEF WINDOWS} 
-  EALREADY = {$IfDef Windows}WSAEALREADY{$Else}ESysEALREADY{$EndIf};
-  EINPROGRESS = {$IfDef Windows}WSAEINPROGRESS{$Else}ESysEINPROGRESS{$EndIf};
-  ECONNREFUSED = {$IfDef Windows}WSAECONNREFUSED{$Else}ESysECONNREFUSED{$EndIf};
+  EALREADY = WSAEALREADY;
+  EINPROGRESS = WSAEINPROGRESS;
+  ECONNREFUSED = WSAECONNREFUSED;
   {$ENDIF}
+  
   {$IFDEF UNIX}
+  EALREADY = ESysEALREADY;
+  EINPROGRESS = ESysEINPROGRESS;
+  ECONNREFUSED = ESysECONNREFUSED;
   {$ENDIF}
   
   {$IFNDEF FULL_IP_STACK}