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

FpDebug: Win32, Fix "Run (F9)" incorrectly triggered watch/stack updates while the app was still running (slowing execution).

Browse Source 
(cherry picked from commit a92db946ec)
This commit is contained in:
Martin 2022-01-13 18:20:13 +01:00
parent 2307e0db21
commit 708715204e
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -3070,6 +3070,7 @@ begin
bplFpcSpecific, bplRtlRestoreContext, bplRtlUnwind,
{$ENDIF}
bplFpcExceptHandler ,bplFpcFinallyHandler, bplFpcLeaveHandler,
bplSehW32Except, bplSehW32Finally,
{$ENDIF}
bplStepOut]);
@ -3079,6 +3080,7 @@ begin
{$IFDEF WIN64} , bplRtlRestoreContext, bplFpcSpecific {$ENDIF}
, bplFpcExceptHandler ,bplFpcFinallyHandler, bplFpcLeaveHandler
{$ENDIF}
, bplSehW32Except, bplSehW32Finally
]);
case st of
@ -3091,6 +3093,7 @@ begin
{$IFDEF MSWINDOWS}
{$IFDEF WIN64} , bplFpcSpecific {$ENDIF}
, bplFpcExceptHandler ,bplFpcFinallyHandler, bplFpcLeaveHandler
, bplSehW32Except, bplSehW32Finally
{$ENDIF}
]);
end