In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/bdae4172ce49ee233037d3e6af7dbeea521d0562?hp=6aba156ffbafbf27a3ba4f313d90ed712fc4e5d4>
- Log ----------------------------------------------------------------- commit bdae4172ce49ee233037d3e6af7dbeea521d0562 Author: Jarkko Hietaniemi <[email protected]> Date: Sat Oct 17 18:11:37 2015 -0400 rt.perl.org #123977 - clear errno in IRIX PERLIO=stdio Under some circumstances IRIX stdio fgetc() and fread() set the errno to ENOENT, which makes no sense according to either IRIX or POSIX docs. Just clear such an errno. ----------------------------------------------------------------------- Summary of changes: perlio.c | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/perlio.c b/perlio.c index ae8cbc9..8ab47e4 100644 --- a/perlio.c +++ b/perlio.c @@ -3332,6 +3332,12 @@ PerlIOStdio_read(pTHX_ PerlIO *f, void *vbuf, Size_t count) return -1; SETERRNO(0,0); /* just in case */ } +#ifdef __sgi + /* Under some circumstances IRIX stdio fgetc() and fread() + * set the errno to ENOENT, which makes no sense according + * to either IRIX or POSIX. [rt.perl.org #123977] */ + if (errno == ENOENT) SETERRNO(0,0); +#endif return got; } -- Perl5 Master Repository
