|
@@ -22,6 +22,8 @@ var
|
|
Application: TTestRunner;
|
|
Application: TTestRunner;
|
|
|
|
|
|
begin
|
|
begin
|
|
|
|
+ DefaultFormat:=fPlain;
|
|
|
|
+ DefaultRunAllTests:=True;
|
|
Application := TTestRunner.Create(nil);
|
|
Application := TTestRunner.Create(nil);
|
|
Application.Initialize;
|
|
Application.Initialize;
|
|
Application.Title := 'RTL-Generics unit tests';
|
|
Application.Title := 'RTL-Generics unit tests';
|