Browse Source

* Ensure FPSockets compiles in unicode rtl

Michael Van Canneyt 10 months ago
parent
commit
b78679afa1

+ 3 - 0
packages/fcl-net/namespaced/System.Net.FPSockets.pp

@@ -0,0 +1,3 @@
+unit System.Net.FPSockets;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i fpsockets.pp}

+ 1 - 0
packages/fcl-net/namespaces.lst

@@ -8,3 +8,4 @@ src/cnetdb.pp=namespaced/System.Net.Cnetdb.pp
 src/netdb.pp=namespaced/System.Net.Netdb.pp
 src/netdb.pp=namespaced/System.Net.Netdb.pp
 src/ssockets.pp=namespaced/System.Net.Ssockets.pp
 src/ssockets.pp=namespaced/System.Net.Ssockets.pp
 src/fpsock.pp=namespaced/System.Net.Fpsock.pp
 src/fpsock.pp=namespaced/System.Net.Fpsock.pp
+src/fpsockets.pp=System.Net.FPSockets.pp

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

@@ -22,7 +22,7 @@ interface
 
 
 {$IFDEF FPC_DOTTEDUNITS}
 {$IFDEF FPC_DOTTEDUNITS}
 uses
 uses
-  System.SysUtils, System.Net.Sockets, SystemNullable;
+  System.SysUtils, System.Net.Sockets, System.Nullable;
 {$ELSE FPC_DOTTEDUNITS}
 {$ELSE FPC_DOTTEDUNITS}
 uses
 uses
   sysutils, sockets, nullable;
   sysutils, sockets, nullable;