paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-07 18:58:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazDebuggerFp: fixed a nil deref, DefaultContext needs CurrentThread

Browse Source 
(cherry picked from commit 217459a76f)
This commit is contained in:
Martin 2021-12-01 20:39:53 +01:00
parent 340f6f1502
commit 626125debf
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
View File

@ -2422,10 +2422,11 @@ begin
exit; exit;
end; end;
end; end;
FDebugger.FDbgController.DefaultContext; // Make sure it is avail and cached / so it can be called outside the thread
if CurrentThread = nil then if CurrentThread = nil then
exit; exit;
FDebugger.FDbgController.DefaultContext; // Make sure it is avail and cached / so it can be called outside the thread
if (FState = esSteppingFpcSpecialHandler) and AnIsFinished and if (FState = esSteppingFpcSpecialHandler) and AnIsFinished and
(ACurCommand is TDbgControllerStepThroughFpcSpecialHandler) (ACurCommand is TDbgControllerStepThroughFpcSpecialHandler)
then begin then begin