paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 13:49:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Remove superfluous initialization of local variable. Fixes issue #40917

Browse Source
This commit is contained in:
Michaël Van Canneyt 2024-09-13 16:09:21 +02:00
parent 633f905b79
commit aec11012e8
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
rtl/objpas/classes/classes.inc
View File

@ -1565,7 +1565,6 @@ function InitInheritedComponent(Instance: TComponent; RootAncestor: TClass): Boo
Var Var
I : Integer; I : Integer;
begin begin
I:=0;
if not Assigned(InitHandlerList) then begin if not Assigned(InitHandlerList) then begin
Result := True; Result := True;
Exit; Exit;