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 | 6e602e293de56675e46a43a5c73830035f39277b (patch) | |
| tree | 7c6d804e54574e50d1e12c920b59bf748b20b407 /regexec.c | |
| parent | 58d76dfdf30230046d41beb912124c3381ef2bc8 (diff) | |
| download | perl-6e602e293de56675e46a43a5c73830035f39277b.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; } |