| 1234567891011121314151617181920212223242526 |
- program CryptoLibConsole;
- {$mode objfpc}{$H+}
- uses
- consoletestrunner,
- IESCipherTests; // pass x64, pass arm, arm raises exception
- type
- { TCryptoLibConsoleTestRunner }
- TCryptoLibConsoleTestRunner = class(TTestRunner)
- protected
- // override the protected methods of TTestRunner to customize its behaviour
- end;
- var
- Application: TCryptoLibConsoleTestRunner;
- begin
- Application := TCryptoLibConsoleTestRunner.Create(nil);
- Application.Initialize;
- Application.Run;
- Application.Free;
- end.
|