From dcc0b706bc48979458080099b7a92ca83646c6d1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Micha=C3=ABl=20Van=20Canneyt?= <michael@freepascal.org>
Date: Tue, 20 Sep 2022 16:53:34 +0200
Subject: [PATCH] * Fix problem reported by Pierre

---
 packages/fcl-net/src/ssockets.pp | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/packages/fcl-net/src/ssockets.pp b/packages/fcl-net/src/ssockets.pp
index 65635650aa..b3a455850a 100644
--- a/packages/fcl-net/src/ssockets.pp
+++ b/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