mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-19 06:39:13 +02:00
IDE: fixed mem leak in sort selection dialog
git-svn-id: trunk@13501 -
This commit is contained in:
parent
9306d7d9e9
commit
ed73de5c00
@ -176,7 +176,7 @@ const
|
||||
SpaceChars = [' ',#9];
|
||||
var
|
||||
Settings: TTextBlockCompareSettings;
|
||||
Tree: TAVLTree;
|
||||
Tree: TAVLTree;// tree of TTextBlock
|
||||
StartPos: Integer;
|
||||
EndPos: Integer;
|
||||
ANode: TAVLTreeNode;
|
||||
@ -317,6 +317,7 @@ begin
|
||||
|
||||
// clean up
|
||||
Tree.FreeAndClear;
|
||||
Tree.Free;
|
||||
Settings.Free;
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user