mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-19 19:39:12 +02:00
Remove useless comments like { private declarations } from class skeletons.
git-svn-id: trunk@52832 -
This commit is contained in:
parent
2cdcbefef6
commit
3eb143d1bc
@ -1025,9 +1025,9 @@ begin
|
|||||||
'type'+LE
|
'type'+LE
|
||||||
+' T'+ResourceName+' = class('+ResourceClass.ClassName+')'+LE
|
+' T'+ResourceName+' = class('+ResourceClass.ClassName+')'+LE
|
||||||
+' private'+LE
|
+' private'+LE
|
||||||
+' { private declarations }'+LE
|
+LE
|
||||||
+' public'+LE
|
+' public'+LE
|
||||||
+' { public declarations }'+LE
|
+LE
|
||||||
+' end;'+LE
|
+' end;'+LE
|
||||||
+LE;
|
+LE;
|
||||||
|
|
||||||
|
@ -108,9 +108,8 @@ begin
|
|||||||
Add('type');
|
Add('type');
|
||||||
Add(' ' + GetNextThreadName + ' = class(TThread)');
|
Add(' ' + GetNextThreadName + ' = class(TThread)');
|
||||||
Add(' private');
|
Add(' private');
|
||||||
Add(' { Private declarations }');
|
Add('');
|
||||||
Add(' protected');
|
Add(' protected');
|
||||||
Add(' { Protected declarations }');
|
|
||||||
Add(' procedure Execute; override;');
|
Add(' procedure Execute; override;');
|
||||||
Add(' end;');
|
Add(' end;');
|
||||||
Add('');
|
Add('');
|
||||||
|
@ -544,9 +544,9 @@ begin
|
|||||||
'type'+LE
|
'type'+LE
|
||||||
+' T'+ResourceName+' = class('+ResourceClass.ClassName+')'+LE
|
+' T'+ResourceName+' = class('+ResourceClass.ClassName+')'+LE
|
||||||
+' private'+LE
|
+' private'+LE
|
||||||
+' { private declarations }'+LE
|
+LE
|
||||||
+' public'+LE
|
+' public'+LE
|
||||||
+' { public declarations }'+LE
|
+LE
|
||||||
+' end;'+LE
|
+' end;'+LE
|
||||||
+LE;
|
+LE;
|
||||||
|
|
||||||
|
@ -805,13 +805,13 @@ begin
|
|||||||
+'type'+LE
|
+'type'+LE
|
||||||
+' '+Params.NewClassName+' = class('+Params.AncestorType+')'+LE
|
+' '+Params.NewClassName+' = class('+Params.AncestorType+')'+LE
|
||||||
+' private'+LE
|
+' private'+LE
|
||||||
+' { Private declarations }'+LE
|
+LE
|
||||||
+' protected'+LE
|
+' protected'+LE
|
||||||
+' { Protected declarations }'+LE
|
+LE
|
||||||
+' public'+LE
|
+' public'+LE
|
||||||
+' { Public declarations }'+LE
|
+LE
|
||||||
+' published'+LE
|
+' published'+LE
|
||||||
+' { Published declarations }'+LE
|
+LE
|
||||||
+' end;'+LE
|
+' end;'+LE
|
||||||
+LE
|
+LE
|
||||||
+'procedure Register;'+LE
|
+'procedure Register;'+LE
|
||||||
|
Loading…
Reference in New Issue
Block a user