|
@@ -14,11 +14,18 @@
|
|
|
**********************************************************************}
|
|
|
|
|
|
{$mode objfpc}
|
|
|
+{$IFNDEF FPC_DOTTEDUNITS}
|
|
|
unit libgmp;
|
|
|
+{$ENDIF FPC_DOTTEDUNITS}
|
|
|
interface
|
|
|
|
|
|
+{$IFDEF FPC_DOTTEDUNITS}
|
|
|
+uses
|
|
|
+ System.CTypes;
|
|
|
+{$ELSE FPC_DOTTEDUNITS}
|
|
|
uses
|
|
|
ctypes;
|
|
|
+{$ENDIF FPC_DOTTEDUNITS}
|
|
|
|
|
|
{
|
|
|
Automatically converted by H2Pas 1.0.0 from libgmp.h
|
|
@@ -597,8 +604,13 @@ function libgmpLoaded: boolean;
|
|
|
|
|
|
implementation
|
|
|
|
|
|
+{$IFDEF FPC_DOTTEDUNITS}
|
|
|
+uses
|
|
|
+ System.SysUtils, System.DynLibs;
|
|
|
+{$ELSE FPC_DOTTEDUNITS}
|
|
|
uses
|
|
|
SysUtils, dynlibs;
|
|
|
+{$ENDIF FPC_DOTTEDUNITS}
|
|
|
|
|
|
var
|
|
|
hlib : tlibhandle;
|