summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@khw-desktop.(none)>2010-06-24 08:21:27 -0600
committerDavid Golden <dagolden@cpan.org>2010-07-17 21:50:48 -0400
commitfa1639c581be6a27f090adf217f82a3e86ba3446 (patch)
treece9274ff749c07475863a10b0f5b5a65d531a84f /regcomp.c
parent9d8606788fa6ee1bda9ff32c9ae6693c93631733 (diff)
downloadperl-fa1639c581be6a27f090adf217f82a3e86ba3446.tar.gz
\400 -\777 now means the same thing in all d-quote
Prior to this patch, \400 - \777 meant something different in some circumstances in regexes outside bracketed character classes. A deprecated warning message has been in place since 5.10.1 when this happens. Remove the warning, and bring the behavior into line with the other double-quotish contexts. \400 - \777 now always means the same thing as \x{100} - \x{1FF} (except when the octal forms are taken as backreferences.) Signed-off-by: David Golden <dagolden@cpan.org>
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c13
1 files changed, 2 insertions, 11 deletions
diff --git a/regcomp.c b/regcomp.c
index 49651b27b7..72af569aae 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -7500,17 +7500,8 @@ tryagain:
I32 flags = 0;
STRLEN numlen = 3;
ender = grok_oct(p, &numlen, &flags, NULL);
-
- /* An octal above 0xff is interpreted differently
- * depending on if the re is in utf8 or not. If it
- * is in utf8, the value will be itself, otherwise
- * it is interpreted as modulo 0x100. It has been
- * decided to discourage the use of octal above the
- * single-byte range. For now, warn only when
- * it ends up modulo */
- if (SIZE_ONLY && ender >= 0x100
- && ! UTF && ! PL_encoding) {
- ckWARNregdep(p, "Use of octal value above 377 is deprecated");
+ if (ender > 0xff) {
+ RExC_utf8 = 1;
}
p += numlen;
}