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

LazDebuggerFp: Don't set breakpoints when the debug session is already over

Browse Source
This commit is contained in:
Martin 2024-01-19 15:42:26 +01:00
parent ec98b15709
commit fd792b5d6f
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

@ -2123,7 +2123,8 @@ procedure TFPBreakpoint.DoChanged;
begin begin
if FResetBreakFlag and not FSetBreakFlag then if FResetBreakFlag and not FSetBreakFlag then
ResetBreak ResetBreak
else if FSetBreakFlag then else
if FSetBreakFlag and not (TFpDebugDebugger(Debugger).State in [dsStop, dsError]) then
SetBreak; SetBreak;
FSetBreakFlag := false; FSetBreakFlag := false;