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

LazDebuggerFp: further fix reading pty for console window. Remove dangling async call before destroying object.

Browse Source 
(cherry picked from commit b1a91a2333)
This commit is contained in:
Martin 2024-02-14 17:35:30 +01:00
parent 84b7bb2ca4
commit 30569f5fe8
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -3424,7 +3424,9 @@ begin
AThread := TFpWaitForConsoleOutputThread(FConsoleOutputThread);
FConsoleOutputThread := nil;
AThread.Terminate;
AThread.DoHasConsoleOutput(0);
AThread.WaitFor;
Application.RemoveAsyncCalls(AThread);
sleep(50);
AThread.DoHasConsoleOutput(0);
AThread.Free;