mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-13 13:19:18 +02:00
LeakView: fix double free crash. Introduced in r61711 #01fb06cf22 by using TFPGObjectList which does auto free objects
git-svn-id: trunk@61808 -
This commit is contained in:
parent
4e7c7e1842
commit
e948c7b47a
@ -304,8 +304,6 @@ procedure THeapTrcViewForm.ClearItems;
|
||||
var
|
||||
i : integer;
|
||||
begin
|
||||
for i := 0 to fItems.Count - 1 do
|
||||
TObject(fItems[i]).Free;
|
||||
fItems.Clear;
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user