On 30/08/18 12:00, Henry Vermaak wrote:
On Thu, Aug 30, 2018 at 10:57:21AM +0000, Mark Morgan Lloyd wrote:> Ah yes, that's it, thanks very much.> > WriteLn(StdErr, Format('# Socket %s, clock resolution %8.6f uSec',> [socketName, ts.tv_nsec / 1000]));> ttextrec(StdErr).flushfunc:= ttextrec(StdErr).inoutfunc;> while true do begin> ttextrec(Output).flushfunc:= ttextrec(Output).inoutfunc;> i := fprecv(client, @buff, 1024, 0); You only need to set flushfunc once at startup (for standard handles) orjust after opening a file. The whole output vs stdout thing hasconfused me in the past, too.
Thanks, noted and good point. That's a result of where the flushes originally were.
-- Mark Morgan Lloyd markMLl .AT. telemetry.co .DOT. uk [Opinions above are the author's, not those of his employers or colleagues] _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal