summaryrefslogtreecommitdiff
path: root/utf8.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-01-31 22:56:16 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-01-31 22:56:16 +0000
commitdf84a23b01be600297e1e5268d9351b807f107f6 (patch)
treed450782e93c0b5c9a1c33a8c62ac3b231835ff6e /utf8.c
parent7dca457a331b97453e1d930c080996ddea87ffa7 (diff)
downloadperl-df84a23b01be600297e1e5268d9351b807f107f6.tar.gz
Macrofy a magic UTF-8 test.
p4raw-id: //depot/perl@8647
Diffstat (limited to 'utf8.c')
-rw-r--r--utf8.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/utf8.c b/utf8.c
index 4555ecb8a5..a36cc7420b 100644
--- a/utf8.c
+++ b/utf8.c
@@ -610,7 +610,7 @@ Perl_bytes_from_utf8(pTHX_ U8* s, STRLEN *len, bool *is_utf8)
U8 c = *s++;
if (!UTF8_IS_ASCII(c)) {
if (UTF8_IS_CONTINUATION(c) || s >= send ||
- !UTF8_IS_CONTINUATION(*s) || (c & 0xfc) != 0xc0)
+ !UTF8_IS_CONTINUATION(*s) || UTF8_IS_DOWNGRADEABLE_START(c))
return start;
s++, count++;
}