paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-08 04:56:02 +02:00
Code Issues Packages Projects Releases Wiki Activity

FpDebug: missing result initialization

Browse Source
This commit is contained in:
Martin 2022-08-07 23:19:17 +02:00
parent 8c274698ab
commit 795b94703f
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/fpdebug/fpdbgdwarfdataclasses.pas
View File

@ -3744,6 +3744,7 @@ var
n: Integer; n: Integer;
CU: TDwarfCompilationUnit; CU: TDwarfCompilationUnit;
begin begin
Result := False;
for n := 0 to FCompilationUnits.Count - 1 do for n := 0 to FCompilationUnits.Count - 1 do
begin begin
CU := TDwarfCompilationUnit(FCompilationUnits[n]); CU := TDwarfCompilationUnit(FCompilationUnits[n]);