This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix for Coverity perl5 CID 29032: Out-of-bounds read (OVERRUN) overrun-local: Overrun...
authorJarkko Hietaniemi <jhi@iki.fi>
Mon, 21 Apr 2014 22:15:58 +0000 (18:15 -0400)
committerTony Cook <tony@develop-help.com>
Tue, 29 Apr 2014 23:58:53 +0000 (09:58 +1000)
commit53673d98756218ddd125311548c0f73c714722f7
treec35400204c6b7caf015692539f3c3d03a78a593a
parent608fe6e2ff595fc26cd6115e2040cb51154c6e45
Fix for Coverity perl5 CID 29032: Out-of-bounds read (OVERRUN) overrun-local: Overrunning array anyofs of 34 8-byte elements at element index 34 (byte offset 272) using index index (which evaluates to 34).

Off-by-one error: because the test "index > number of elements"
should have used ">=", the anyofs[] could have been accessed one
past the end.  Use the C_ARRAY_LENGTH since we have it.
I think regprop is only used by -Mre=debug.
regcomp.c