mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-16 18:19:16 +02:00
* Fix problem reported by Pierre
This commit is contained in:
parent
4f9acc10f0
commit
dcc0b706bc
@ -18,6 +18,12 @@ interface
|
|||||||
|
|
||||||
uses
|
uses
|
||||||
// This must be here, to prevent it from overriding the sockets definitions... :/
|
// 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;
|
SysUtils, Classes, ctypes, sockets;
|
||||||
|
|
||||||
type
|
type
|
||||||
@ -330,12 +336,6 @@ type
|
|||||||
Implementation
|
Implementation
|
||||||
|
|
||||||
uses
|
uses
|
||||||
{$ifdef unix}
|
|
||||||
BaseUnix,Unix,
|
|
||||||
{$endif}
|
|
||||||
{$ifdef windows}
|
|
||||||
winsock2, windows,
|
|
||||||
{$endif}
|
|
||||||
resolve;
|
resolve;
|
||||||
|
|
||||||
Const
|
Const
|
||||||
|
Loading…
Reference in New Issue
Block a user