diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-01-05 06:44:27 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-01-05 06:44:27 +0000 |
commit | fd400ab9029cac48f6054d57b59a99ec1c5d5e1e (patch) | |
tree | 48c21ddf1f8c4aa55b33343393a2bf6d75524a0c /regexec.c | |
parent | f5cf745e299cac34ef186d2d2d056e876998ccb2 (diff) | |
download | perl-fd400ab9029cac48f6054d57b59a99ec1c5d5e1e.tar.gz |
UTF-8 cleanup.
p4raw-id: //depot/perl@8328
Diffstat (limited to 'regexec.c')
-rw-r--r-- | regexec.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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))) |