paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-07-31 20:57:51 +02:00
Code Issues Packages Projects Releases Wiki Activity

PoChecker: removed unused boilerplate constructors from TPoFamily class

Browse Source 
git-svn-id: trunk@60674 -
This commit is contained in:
maxim 2019-03-14 23:39:11 +00:00
parent be9ae3b82b
commit 41c97f0864
1 changed files with 0 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
components/pochecker/pofamilies.pp
View File

@ -61,8 +61,6 @@ Type
procedure DoTestStart(const ATestName, APoFileName: String);
procedure DoTestEnd(const ATestName: String; const ErrorCount: Integer);
public
constructor Create;
constructor Create(const MasterName: String);
constructor Create(const AMasterName, AChildName: String);
destructor Destroy; override;
@ -360,16 +358,6 @@ begin
FChildName := AValue;
end;
constructor TPoFamily.Create;
begin
Create('','');
end;
constructor TPoFamily.Create(const MasterName: String);
begin
Create(MasterName, '');
end;
constructor TPoFamily.Create(const AMasterName, AChildName: String);
begin
if (AMasterName <> '') then