diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-03-20 11:56:11 -0600 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2011-03-20 12:16:13 -0600 |
commit | c3e1d013b9da26e290ebf714fdb35fe5e7a97d9d (patch) | |
tree | af5c96fdeea820ded72b4f640ac8f5569e330dc2 /regexec.c | |
parent | 90826b5cd27738a30509f332296d8b985731d3fc (diff) | |
download | perl-c3e1d013b9da26e290ebf714fdb35fe5e7a97d9d.tar.gz |
regexec.c: Rmv special code no longer needed
The trickyness has been resolved elsewhere
Diffstat (limited to 'regexec.c')
-rw-r--r-- | regexec.c | 17 |
1 files changed, 3 insertions, 14 deletions
@@ -3625,20 +3625,9 @@ S_regmatch(pTHX_ regmatch_info *reginfo, regnode *prog) char *e = PL_regeol; if (! foldEQ_utf8_flags(s, 0, ln, cBOOL(UTF_PATTERN), - l, &e, 0, utf8_target, fold_utf8_flags)) { - /* One more case for the sharp s: - * pack("U0U*", 0xDF) =~ /ss/i, - * the 0xC3 0x9F are the UTF-8 - * byte sequence for the U+00DF. */ - - if (!(utf8_target && - toLOWER(s[0]) == 's' && - ln >= 2 && - toLOWER(s[1]) == 's' && - (U8)l[0] == 0xC3 && - e - l >= 2 && - (U8)l[1] == 0x9F)) - sayNO; + l, &e, 0, utf8_target, fold_utf8_flags)) + { + sayNO; } locinput = e; nextchr = UCHARAT(locinput); |