mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-17 08:59:39 +01:00
37 lines
769 B
ObjectPascal
37 lines
769 B
ObjectPascal
{ %CONFIGFILE=fpcunit-console-defaults.ini testdefaults.ini }
|
|
{ %SKIPTARGET=embedded,nativent,msdos,win16,macos,palmos }
|
|
|
|
program testrunner.rtlgenerics;
|
|
|
|
{$mode objfpc}{$H+}
|
|
|
|
uses
|
|
consoletestrunner,
|
|
tests.generics.bugs,
|
|
tests.generics.hashmaps,
|
|
tests.generics.arrayhelper,
|
|
tests.generics.trees,
|
|
tests.generics.stdcollections,
|
|
tests.generics.sets,
|
|
tests.generics.queue,
|
|
tests.generics.stack,
|
|
tests.generics.dictionary
|
|
;
|
|
|
|
var
|
|
Application: TTestRunner;
|
|
|
|
begin
|
|
DefaultFormat:=fPlain;
|
|
DefaultRunAllTests:=True;
|
|
Application := TTestRunner.Create(nil);
|
|
Application.Initialize;
|
|
Application.Title := 'RTL-Generics unit tests';
|
|
Application.Run;
|
|
Application.Free;
|
|
{$IFDEF WAIT_FOR_ENTER}
|
|
WriteLn('Press enter...');
|
|
ReadLn;
|
|
{$ENDIF}
|
|
end.
|