This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
57ab6c6
)
Revert RT #131190 patches.
author
Yves Orton
<demerphq@gmail.com>
Fri, 28 Apr 2017 07:19:22 +0000
(09:19 +0200)
committer
Yves Orton
<demerphq@gmail.com>
Fri, 28 Apr 2017 07:20:02 +0000
(09:20 +0200)
This reverts commit
ca7eb79a236b41b7722c6800527f95cd76843eed
,
and commit
85fde2b7c3f5631fd982f5db735b84dc9224bec0
.
regexec.c
patch
|
blob
|
blame
|
history
diff --git
a/regexec.c
b/regexec.c
index
35b88d7
..
82128a7
100644
(file)
--- a/
regexec.c
+++ b/
regexec.c
@@
-5593,7
+5593,6
@@
S_regmatch(pTHX_ regmatch_info *reginfo, char *startpos, regnode *prog)
if (scan->flags == EXACTL || scan->flags == EXACTFLU8) {
_CHECK_AND_WARN_PROBLEMATIC_LOCALE;
if (utf8_target
- && nextchr >= 0 /* guard against negative EOS value in nextchr */
&& UTF8_IS_ABOVE_LATIN1(nextchr)
&& scan->flags == EXACTL)
{