|
@@ -16,21 +16,35 @@
|
|
website for this.
|
|
website for this.
|
|
}
|
|
}
|
|
{$mode objfpc}
|
|
{$mode objfpc}
|
|
|
|
+{$IFNDEF FPC_DOTTEDUNITS}
|
|
unit libcurl;
|
|
unit libcurl;
|
|
|
|
+{$ENDIF FPC_DOTTEDUNITS}
|
|
|
|
|
|
interface
|
|
interface
|
|
|
|
|
|
{$IFDEF WINDOWS}
|
|
{$IFDEF WINDOWS}
|
|
|
|
+{$IFDEF FPC_DOTTEDUNITS}
|
|
|
|
+uses
|
|
|
|
+ System.CTypes;
|
|
|
|
+{$ELSE FPC_DOTTEDUNITS}
|
|
uses
|
|
uses
|
|
ctypes;
|
|
ctypes;
|
|
|
|
+{$ENDIF FPC_DOTTEDUNITS}
|
|
|
|
|
|
type
|
|
type
|
|
time_t = clong;
|
|
time_t = clong;
|
|
PTime_t = ^time_t;
|
|
PTime_t = ^time_t;
|
|
off_t = clong;
|
|
off_t = clong;
|
|
{$ELSE}
|
|
{$ELSE}
|
|
|
|
+
|
|
|
|
+{$IFDEF FPC_DOTTEDUNITS}
|
|
|
|
+uses
|
|
|
|
+ UnixApi.Types;
|
|
|
|
+{$ELSE FPC_DOTTEDUNITS}
|
|
uses
|
|
uses
|
|
unixtype;
|
|
unixtype;
|
|
|
|
+{$ENDIF FPC_DOTTEDUNITS}
|
|
|
|
+
|
|
{$ENDIF}
|
|
{$ENDIF}
|
|
|
|
|
|
{$IFDEF FPC}
|
|
{$IFDEF FPC}
|