Skip to content

Commit b630df2

Browse files
feat: add empty unit test
Upload a empty unit test to check the working with travis.
1 parent 53184a8 commit b630df2

File tree

4 files changed

+142
-0
lines changed

4 files changed

+142
-0
lines changed
Lines changed: 77 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,77 @@
1+
<?xml version="1.0" encoding="UTF-8"?>
2+
<CONFIG>
3+
<ProjectOptions>
4+
<Version Value="9"/>
5+
<PathDelim Value="\"/>
6+
<General>
7+
<Flags>
8+
<SaveJumpHistory Value="False"/>
9+
<SaveFoldState Value="False"/>
10+
</Flags>
11+
<SessionStorage Value="InProjectDir"/>
12+
<MainUnit Value="0"/>
13+
<Title Value="tracker_editor_test"/>
14+
<UseAppBundle Value="False"/>
15+
<ResourceType Value="res"/>
16+
</General>
17+
<i18n>
18+
<EnableI18N LFM="False"/>
19+
</i18n>
20+
<VersionInfo>
21+
<StringTable ProductVersion=""/>
22+
</VersionInfo>
23+
<BuildModes Count="1">
24+
<Item1 Name="Default" Default="True"/>
25+
</BuildModes>
26+
<PublishOptions>
27+
<Version Value="2"/>
28+
</PublishOptions>
29+
<RunParams>
30+
<local>
31+
<FormatVersion Value="1"/>
32+
<CommandLineParams Value="-a --format=plain"/>
33+
</local>
34+
</RunParams>
35+
<RequiredPackages Count="1">
36+
<Item1>
37+
<PackageName Value="FCL"/>
38+
</Item1>
39+
</RequiredPackages>
40+
<Units Count="2">
41+
<Unit0>
42+
<Filename Value="tracker_editor_test.lpr"/>
43+
<IsPartOfProject Value="True"/>
44+
</Unit0>
45+
<Unit1>
46+
<Filename Value="..\..\test\testcase1.pas"/>
47+
<IsPartOfProject Value="True"/>
48+
<UnitName Value="TestCase1"/>
49+
</Unit1>
50+
</Units>
51+
</ProjectOptions>
52+
<CompilerOptions>
53+
<Version Value="11"/>
54+
<PathDelim Value="\"/>
55+
<Target>
56+
<Filename Value="..\..\..\enduser\tracker_editor_test"/>
57+
</Target>
58+
<SearchPaths>
59+
<IncludeFiles Value="$(ProjOutDir)"/>
60+
<OtherUnitFiles Value="..\..\test"/>
61+
<UnitOutputDirectory Value="..\..\..\lib\tracker_editor_test\$(TargetCPU)-$(TargetOS)"/>
62+
</SearchPaths>
63+
</CompilerOptions>
64+
<Debugging>
65+
<Exceptions Count="3">
66+
<Item1>
67+
<Name Value="EAbort"/>
68+
</Item1>
69+
<Item2>
70+
<Name Value="ECodetoolError"/>
71+
</Item2>
72+
<Item3>
73+
<Name Value="EFOpenError"/>
74+
</Item3>
75+
</Exceptions>
76+
</Debugging>
77+
</CONFIG>

source/project/unit_test/tracker_editor_test.lpr

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1 @@
1+
program tracker_editor_test;{$mode objfpc}{$H+}uses Classes, consoletestrunner, fpcunit, fpcunitreport, TestCase1;type { TLazTestRunner } { TMyTestRunner } TMyTestRunner = class(TTestRunner) protected // override the protected methods of TTestRunner to customize its behavior procedure DoTestRun(ATest: TTest); override; end;var Application: TMyTestRunner; { TMyTestRunner } procedure TMyTestRunner.DoTestRun(ATest: TTest); var ResultsWriter: TCustomResultsWriter; TestResult: TTestResult; begin ResultsWriter := GetResultsWriter; ResultsWriter.Filename := FileName; TestResult := TTestResult.Create; try TestResult.AddListener(ResultsWriter); ATest.Run(TestResult); ResultsWriter.WriteResult(TestResult); //if something failed then exit with error: -1 if (TestResult.NumberOfErrors > 0) or (TestResult.NumberOfFailures > 0) then begin System.ExitCode := -1; end; finally TestResult.Free; ResultsWriter.Free; end; end;begin Application := TMyTestRunner.Create(nil); Application.Initialize; Application.Run; Application.Free;end.
Lines changed: 23 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,23 @@
1+
<?xml version="1.0" encoding="UTF-8"?>
2+
<CONFIG>
3+
<ProjectSession>
4+
<PathDelim Value="\"/>
5+
<Version Value="9"/>
6+
<BuildModes Active="Default"/>
7+
<Units Count="2">
8+
<Unit0>
9+
<Filename Value="tracker_editor_test.lpr"/>
10+
<IsPartOfProject Value="True"/>
11+
<UsageCount Value="20"/>
12+
</Unit0>
13+
<Unit1>
14+
<Filename Value="..\..\test\testcase1.pas"/>
15+
<IsPartOfProject Value="True"/>
16+
<UnitName Value="TestCase1"/>
17+
<IsVisibleTab Value="True"/>
18+
<UsageCount Value="20"/>
19+
<Loaded Value="True"/>
20+
</Unit1>
21+
</Units>
22+
</ProjectSession>
23+
</CONFIG>

source/test/testcase1.pas

Lines changed: 41 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,41 @@
1+
unit TestCase1;
2+
3+
{$mode objfpc}{$H+}
4+
5+
interface
6+
7+
uses
8+
Classes, SysUtils, fpcunit, testutils, testregistry;
9+
10+
type
11+
12+
TTestCase1= class(TTestCase)
13+
protected
14+
procedure SetUp; override;
15+
procedure TearDown; override;
16+
published
17+
procedure TestHookUp;
18+
end;
19+
20+
implementation
21+
22+
procedure TTestCase1.TestHookUp;
23+
begin
24+
Fail('Write your own test');
25+
end;
26+
27+
procedure TTestCase1.SetUp;
28+
begin
29+
30+
end;
31+
32+
procedure TTestCase1.TearDown;
33+
begin
34+
35+
end;
36+
37+
initialization
38+
39+
RegisterTest(TTestCase1);
40+
end.
41+

0 commit comments

Comments
 (0)