mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-31 11:40:33 +02:00
DBG: Fixed freeing cmd-queue
git-svn-id: trunk@31161 -
This commit is contained in:
parent
066a27820b
commit
82bf90e262
@ -6534,7 +6534,7 @@ var
|
||||
i: Integer;
|
||||
begin
|
||||
for i:=0 to FCommandQueue.Count-1 do begin
|
||||
TGDBMIDebuggerCommand(FCommandQueue[i]).Free;
|
||||
TGDBMIDebuggerCommand(FCommandQueue[i]).ReleaseReference;
|
||||
end;
|
||||
FCommandQueue.Clear;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user