diff options
author | Andreas König <a.koenig@mind.de> | 2002-03-12 01:40:09 +0100 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-17 04:23:49 +0000 |
commit | 8f62211f8c7d3452aedc4c60bf4209f80201d79c (patch) | |
tree | 7c6d804e54574e50d1e12c920b59bf748b20b407 /regexec.c | |
parent | 42570cc7e560bfe5a530bb756f8da399844ff173 (diff) | |
download | perl-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.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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; } |