On 20 Oct 2007, at 18:20, Marc Santhoff wrote:

writeln(stderr, '--> hit found: '+inttostr(fcnt) + ' - ' +
inttostr(PInteger(longint(adr)-longint(fx))^) + ' - ' +
floattostr(PSingle(adr)^));

Very nasty thing:

The output channel is temporarily blocked and gives back "EAGAIN".

I guess the initialisation code of the system unit should close and reopen stdin/out/err to make sure none of them is configured for non- blocking I/O.

Jonas



_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to