mirror of
https://github.com/Perl/perl5.git
synced 2026-01-26 16:39:36 +00:00
4d19b36932
Coverity complained that the range of SvIV(result) could be large and well outside the bounds of the buffer at SvPVX(). So sanity check that the value of result is within range, if it is out of range warn and return an error. Also document the bottom of the range of expected return values from READ, -1 is less than $len and resulted in a crash. Ideally we'd just use the length of the modified $buffer to avoid such range errors, but the API is already designed, so we can't. CID 453853