This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fileno might return negative.
authorJarkko Hietaniemi <jhi@iki.fi>
Mon, 22 Jun 2015 11:25:27 +0000 (07:25 -0400)
committerJarkko Hietaniemi <jhi@iki.fi>
Sat, 27 Jun 2015 03:09:39 +0000 (23:09 -0400)
commit96e1df159163b60ee36220bfa318a5e541a3ab5e
treee290edcb1fc453f0092bde636452eb6f86942e0b
parent393bc9b3483a2e80d10a63fec99c2b2088b66154
fileno might return negative.

(Coverity CID 104853)

Also rewrite the fstat call to test for zero (success) explicitly,
instead of the sneaky bang-negation.
sv.c