In perl.git, the branch blead has been updated <https://perl5.git.perl.org/perl.git/commitdiff/c6f37d61adb39a6d7764b1bcb6bb67accb22a0a0?hp=8d3e0237887e7149be56d17a9448cb465edc5f76>
- Log ----------------------------------------------------------------- commit c6f37d61adb39a6d7764b1bcb6bb67accb22a0a0 Author: Karl Williamson <[email protected]> Date: Fri May 24 09:01:46 2019 -0600 PATCH: [perl #134133] read beyond end of buffer The code was using the wrong limit variable. ----------------------------------------------------------------------- Summary of changes: regcomp.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/regcomp.c b/regcomp.c index d61fd434fe..b2cc6672cb 100644 --- a/regcomp.c +++ b/regcomp.c @@ -22946,7 +22946,7 @@ Perl_parse_uniprop_string(pTHX_ /* Certain properties whose values are numeric need special handling. * They may optionally be prefixed by 'is'. Ignore that prefix for the * purposes of checking if this is one of those properties */ - if (memBEGINPs(lookup_name, name_len, "is")) { + if (memBEGINPs(lookup_name, j, "is")) { lookup_offset = 2; } -- Perl5 Master Repository
