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