{%RunFlags MESSAGES+}
{$mode ObjFPC}{$H-}
program helloworld(output);


uses
    TariffCalculator, CTypes;

var
   TariffCalc:  TariffCalculatorHandle;
   CustomerRepo: array[0..100] of char;
   LocalCustomerRepo: array[0..100] of char;

begin
writeLn('Hello, World!') ;
// TariffCalc := NewTariffCalculator;
// DeleteTariffCalculator(TariffCalc);
   if InitGitLibrary() > 0 then
        begin
        writeLn('init OK!') ;
        CustomerRepo := 'https://git.mimbach49.de/GerhardHoffmann/customer_999.git';
        LocalCustomerRepo := 'C:\\tmp\\customer_999';
        CloneRepository(CustomerRepo, LocalCustomerRepo);

        ShutdownGitLibrary();
        end
   else
       begin
       writeLn('init NOT OK!') ;
       Readln;
       end;
end.