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

leakview: support heaptraces from other platforms

Browse Source
This commit is contained in:
mattias 2024-04-14 13:07:50 +02:00
parent 3a7915bb59
commit bdb9668aa8
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/leakview/heaptrcview.pas
View File

@ -362,7 +362,7 @@ begin
trace := TStackTrace(nd.Parent.Data); trace := TStackTrace(nd.Parent.Data);
if not Assigned(trace) or (idx >= trace.Count) then Exit; if not Assigned(trace) or (idx >= trace.Count) then Exit;
searchFile := trace.Lines[idx].FileName; searchFile := Trim(SetDirSeparators(trace.Lines[idx].FileName));
if searchFile = '' then Exit; if searchFile = '' then Exit;
StackLine:= trace.Lines[idx]; StackLine:= trace.Lines[idx];