fpc/packages/fcl-hash/tests/testhash.pp
Michaël Van Canneyt 3180a5e83a * PChar -> PAnsiChar
2023-07-15 18:22:41 +02:00

24 lines
448 B
ObjectPascal

{ %CONFIGFILE=fpcunit-console-defaults.ini testdefaults.ini }
program testhash;
{$mode objfpc}
uses
{$ifdef unix}
cwstring,
{$endif}
consoletestrunner, utestsha256, utestonetimepass, utestsha512, utestpem, fpECC, fphashutils, fpsha256;
var
Application: TTestRunner;
begin
DefaultFormat:=fPlain;
DefaultRunAllTests:=True;
Application := TTestRunner.Create(nil);
Application.Initialize;
Application.Run;
Application.Free;
end.