wim stuff

This commit is contained in:
Gerhard Hoffmann 2024-03-11 16:36:25 +01:00
parent 3c7b5d0958
commit 4e13dda29d
5 changed files with 35 additions and 0 deletions

BIN
windows/git2.dll Normal file

Binary file not shown.

BIN
windows/git2.exp Normal file

Binary file not shown.

BIN
windows/git2.lib Normal file

Binary file not shown.

BIN
windows/git2.pdb Normal file

Binary file not shown.

View File

@ -0,0 +1,35 @@
unit TariffCalculator;
{$mode ObjFPC}{$H+}
interface
uses
SysUtils, CTypes;
type
// Can't use the class directly, so it is treated as an opaque handle.
// THandle is guaranteed to have the right size, even on other platforms.
TariffCalculatorHandle = THandle;
function NewTariffCalculator: TariffCalculatorHandle; stdcall;
procedure DeleteTariffCalculator(handle: TariffCalculatorHandle); stdcall;
function InitGitLibrary: cint32; stdcall;
function ShutdownGitLibrary: cint32; stdcall;
function CloneRepository(var url; var local_path) : cint32; stdcall;
implementation
const
DLLName = 'CalculatorCInterface.dll';
function NewTariffCalculator: TariffCalculatorHandle; stdcall; external DLLName;
procedure DeleteTariffCalculator(handle: TariffCalculatorHandle); stdcall; external DLLName;
function InitGitLibrary: cint32; stdcall; external DLLName;
function ShutdownGitLibrary: cint32; stdcall; external DLLName;
function CloneRepository(var url; var local_path) : cint32; stdcall; external DLLName;
end.