mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-02 18:59:30 +01:00
* Fixed Bug #24320 with patch as suggested by submitter
git-svn-id: trunk@24322 -
This commit is contained in:
parent
4f69d1046a
commit
742b9b5359
@ -368,6 +368,8 @@ begin
|
||||
else
|
||||
Terminate;
|
||||
end;
|
||||
if not Terminated then
|
||||
WaitMessage;
|
||||
Until Terminated;
|
||||
end;
|
||||
finally
|
||||
|
||||
Loading…
Reference in New Issue
Block a user