mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-19 07:29:25 +02:00
FpDebug: Fix compilation after r44595 #ab2522e911
git-svn-id: trunk@44596 -
This commit is contained in:
parent
ab2522e911
commit
e9f865d7b8
@ -432,8 +432,7 @@ begin
|
||||
writeln('Exit');
|
||||
// Clear all pending signals
|
||||
repeat
|
||||
c := FpWaitPid(-1, FStatus, WNOHANG);
|
||||
until c<1;
|
||||
until FpWaitPid(-1, FStatus, WNOHANG)<1;
|
||||
|
||||
result := deExitProcess
|
||||
end
|
||||
|
Loading…
Reference in New Issue
Block a user