paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-03 04:57:14 +01:00
Code Issues Packages Projects Releases Wiki Activity

LeakView: added valgrind parser

Browse Source 
git-svn-id: trunk@58360 -
This commit is contained in:
martin 2018-06-20 19:59:02 +00:00
parent c9775c281e
commit d84738e020
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/leakinfo.pas
View File

@ -515,7 +515,7 @@ procedure THeapTrcInfo.ParseTraceLine(s: string; var line: TStackLine);
i := pos(' (', s); i := pos(' (', s);
if i < 3 then exit; if i < 3 then exit;
fn := copy(s,1,i-1); fn := copy(s,1,i-1);
Delete(s, 1, i); Delete(s, 1, i+1);
i := pos(':', s); i := pos(':', s);
if i < 3 then exit; if i < 3 then exit;