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

LazDebuggerFp: Fixed/Workaround an endless loop with auto-continue breakpoints. The new async-stack-eval was not taken into account.

Browse Source 
git-svn-id: trunk@62319 -
This commit is contained in:
martin 2019-12-03 01:55:29 +00:00
parent dc42d0fa38
commit b206664b05
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1859,8 +1859,11 @@ begin
if &continue then begin if &continue then begin
// wait for any watches for Snapshots // wait for any watches for Snapshots
while FWatchAsyncQueued do while FWatchAsyncQueued do begin
if TFPCallStackSupplier(CallStack).FReqList.Count > 0 then
Application.Idle(False);
ProcessASyncWatches(0); ProcessASyncWatches(0);
end;
end; end;
end; end;