diff options
author | Karl Williamson <public@khwilliamson.com> | 2010-10-31 10:33:50 -0600 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2010-10-31 14:56:46 -0700 |
commit | b32d7d3e8f81b492f99ac325dc00ad4dca683023 (patch) | |
tree | 991bc5561e8fb96e80618b7bf99c27dbcc41d0bc /regexec.c | |
parent | 4b3cda86f0c2a54a1ac8bbbaf4a2412f98dff6c0 (diff) | |
download | perl-b32d7d3e8f81b492f99ac325dc00ad4dca683023.tar.gz |
regexec.c: Remove redundant line.
Now that reginclass is guaranteed to return the match length upon
success, the caller need not do it again.
Diffstat (limited to 'regexec.c')
-rw-r--r-- | regexec.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3633,7 +3633,7 @@ S_regmatch(pTHX_ regmatch_info *reginfo, regnode *prog) goto anyof_fail; if (locinput >= PL_regeol) sayNO; - locinput += inclasslen ? inclasslen : UTF8SKIP(locinput); + locinput += inclasslen; nextchr = UCHARAT(locinput); break; } |