Browse Source

* Fix problem reported by Pierre

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

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

@@ -18,6 +18,12 @@ interface
 
 uses
 // This must be here, to prevent it from overriding the sockets definitions... :/
+{$ifdef unix}
+  BaseUnix,Unix,
+{$endif}
+{$ifdef windows}
+  winsock2, windows,
+{$endif}
   SysUtils, Classes, ctypes, sockets;
 
 type
@@ -330,12 +336,6 @@ type
 Implementation
 
 uses
-{$ifdef unix}
-  BaseUnix,Unix,
-{$endif}
-{$ifdef windows}
-  winsock2, windows,
-{$endif}
   resolve;
 
 Const