summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorAndreas König <a.koenig@mind.de>2002-03-12 01:40:09 +0100
committerJarkko Hietaniemi <jhi@iki.fi>2002-03-17 04:23:49 +0000
commit8f62211f8c7d3452aedc4c60bf4209f80201d79c (patch)
tree7c6d804e54574e50d1e12c920b59bf748b20b407 /regexec.c
parent42570cc7e560bfe5a530bb756f8da399844ff173 (diff)
downloadperl-8f62211f8c7d3452aedc4c60bf4209f80201d79c.tar.gz
SEGV in s/// and UTF-8
Message-ID: <m3r8mqad2e.fsf@anima.de> p4raw-id: //depot/perl@15268
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/regexec.c b/regexec.c
index 13832311c7..f620a3485d 100644
--- a/regexec.c
+++ b/regexec.c
@@ -2425,7 +2425,7 @@ S_regmatch(pTHX_ regnode *prog)
sayNO_ANYOF;
if (locinput >= PL_regeol)
sayNO;
- locinput += inclasslen;
+ locinput += inclasslen ? inclasslen : 1;
nextchr = UCHARAT(locinput);
break;
}