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

Codetools: Fix a memory leak after trying to open a non-existent include file. Issue #40991.

Browse Source
This commit is contained in:
Juha 2024-06-28 17:35:06 +03:00
parent 0ce892437b
commit a5b0a87c97
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/codetools/finddeclarationtool.pas
View File

@ -3810,10 +3810,10 @@ var
FoundFilename:=ResolveDots(GetForcedPathDelims(Param));
// search include file
MissingIncludeFile:=nil;
if Scanner.SearchIncludeFile(FoundFilename,NewSrcLog,
MissingIncludeFile)
if Scanner.SearchIncludeFile(FoundFilename,NewSrcLog,MissingIncludeFile)
then
FoundFilename:=TCodeBuffer(NewSrcLog).Filename;
MissingIncludeFile.Free;
end;
exit;
end;