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

Debugger: fix freeing converter

Browse Source
This commit is contained in:
Martin 2022-07-21 22:49:11 +02:00
parent 5357d6a3f0
commit 0dfb936053
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/packages/idedebugger/debugger.pp
View File

@ -4009,7 +4009,7 @@ end;
procedure TCurrentWatchValue.RequestData; procedure TCurrentWatchValue.RequestData;
begin begin
FFpDbgConverter.Free; FreeAndNil(FFpDbgConverter);
if Watch.FpDbgConverter <> nil then if Watch.FpDbgConverter <> nil then
FFpDbgConverter := TIdeFpDbgConverterConfig(Watch.FpDbgConverter.CreateCopy); FFpDbgConverter := TIdeFpDbgConverterConfig(Watch.FpDbgConverter.CreateCopy);
TCurrentWatch(Watch).RequestData(self); TCurrentWatch(Watch).RequestData(self);