summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2011-02-05 10:50:37 -0700
committerKarl Williamson <public@khwilliamson.com>2011-02-14 08:41:36 -0700
commit10ee90d23197cab372804843c9ffe601f24ebc3b (patch)
treee112a0a04fdf8fd5e00d5453009094ad1a62aac6 /regexec.c
parenta5d74e1d0809998b8f63382635aae40d4c0b24ed (diff)
downloadperl-10ee90d23197cab372804843c9ffe601f24ebc3b.tar.gz
regexec.c: Remove folding now done in regcomp
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c15
1 files changed, 4 insertions, 11 deletions
diff --git a/regexec.c b/regexec.c
index 476a966caa..e0d27eaa4d 100644
--- a/regexec.c
+++ b/regexec.c
@@ -6638,18 +6638,11 @@ S_reginclass(pTHX_ const regexp * const prog, register const regnode * const n,
/* If the bitmap didn't (or couldn't) match, and something outside the
* bitmap could match, try that */
if (!match) {
- if (utf8_target && (flags & ANYOF_UNICODE_ALL)) {
- if (c >= 256
- || ((flags & ANYOF_LOC_NONBITMAP_FOLD) /* Latin1 1 that has a
- non-Latin1 fold
- should match */
- && _HAS_NONLATIN1_FOLD_CLOSURE_ONLY_FOR_USE_BY_REGCOMP_DOT_C_AND_REGEXEC_DOT_C(c)))
- {
- match = TRUE;
- }
+ if (utf8_target && (flags & ANYOF_UNICODE_ALL) && c >= 256) {
+ match = TRUE; /* Everything above 255 matches */
}
- if (!match && ((flags & ANYOF_NONBITMAP_NON_UTF8)
- || (utf8_target && flags & ANYOF_UTF8)))
+ else if ((flags & ANYOF_NONBITMAP_NON_UTF8
+ || (utf8_target && flags & ANYOF_UTF8)))
{
AV *av;
SV * const sw = regclass_swash(prog, n, TRUE, 0, (SV**)&av);