summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-01-05 06:44:27 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-01-05 06:44:27 +0000
commitfd400ab9029cac48f6054d57b59a99ec1c5d5e1e (patch)
tree48c21ddf1f8c4aa55b33343393a2bf6d75524a0c /regexec.c
parentf5cf745e299cac34ef186d2d2d056e876998ccb2 (diff)
downloadperl-fd400ab9029cac48f6054d57b59a99ec1c5d5e1e.tar.gz
UTF-8 cleanup.
p4raw-id: //depot/perl@8328
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/regexec.c b/regexec.c
index 0c29b78f8c..0b65d110f2 100644
--- a/regexec.c
+++ b/regexec.c
@@ -2273,7 +2273,7 @@ S_regmatch(pTHX_ regnode *prog)
if (!nextchr)
sayNO;
if (do_utf8) {
- if (nextchr & 0x80) {
+ if (UTF8_IS_CONTINUED(nextchr)) {
if (!(OP(scan) == SPACE
? swash_fetch(PL_utf8_space, (U8*)locinput)
: isSPACE_LC_utf8((U8*)locinput)))