blob: 82caf802a3f2eebf022cd313263bfc4b5bf0e720 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
program TestDriver;
{
Delphi DUnit Test Project
-------------------------
This project contains the DUnit test framework and the GUI/Console test runners.
Add "CONSOLE_TESTRUNNER" to the conditional defines entry in the project options
to use the console test runner. Otherwise the GUI test runner will be used by
default.
}
{$IFDEF CONSOLE_TESTRUNNER}
{$APPTYPE CONSOLE}
{$ENDIF}
uses
Forms,
TestFramework,
GUITestRunner,
TextTestRunner,
Antlr.Runtime.Tools.Tests in 'Antlr.Runtime.Tools.Tests.pas',
Antlr.Runtime.Collections.Tests in 'Antlr.Runtime.Collections.Tests.pas',
Antlr.Runtime.Tree.Tests in 'Antlr.Runtime.Tree.Tests.pas',
Antlr.Runtime.Tests in 'Antlr.Runtime.Tests.pas';
{$R *.RES}
begin
ReportMemoryLeaksOnShutdown := True;
Application.Initialize;
if IsConsole then
TextTestRunner.RunRegisteredTests
else
GUITestRunner.RunRegisteredTests;
end.
|