mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-16 14:20:05 +02:00
* Call SysFlushStdio from FlushThread, instead of duplicating its functionality.
* Don't call FlushThread from EndThread, since r17798 it is called from DoneThread. git-svn-id: trunk@18018 -
This commit is contained in:
parent
4d0e8ca896
commit
24c3a43b35
@ -124,18 +124,13 @@ procedure FlushThread;
|
||||
|
||||
begin
|
||||
{$ifdef FPC_HAS_FEATURE_CONSOLEIO}
|
||||
{ Make sure that all output is written to the redirected file }
|
||||
Flush(Output);
|
||||
Flush(ErrOutput);
|
||||
Flush(StdOut);
|
||||
Flush(StdErr);
|
||||
SysFlushStdio;
|
||||
{$endif FPC_HAS_FEATURE_CONSOLEIO}
|
||||
end;
|
||||
|
||||
procedure EndThread(ExitCode : DWord);
|
||||
|
||||
begin
|
||||
FlushThread;
|
||||
CurrentTM.EndThread(ExitCode);
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user