diff options
author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-03-17 17:44:16 +0000 |
---|---|---|
committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-03-17 17:44:16 +0000 |
commit | d742c382eed38a7010c93d369ad6896d826c21d6 (patch) | |
tree | 1335117a4c19316510dfc6f57f1f626fe80063b9 /doop.c | |
parent | 73d6d5898f99c77c19a56e8934a3f0d8ab9918b8 (diff) | |
download | perl-d742c382eed38a7010c93d369ad6896d826c21d6.tar.gz |
Minor naming change UTF8_IS_ASCII => UTF8_IS_INVARIANT
p4raw-id: //depot/perlio@9184
Diffstat (limited to 'doop.c')
-rw-r--r-- | doop.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -408,7 +408,7 @@ S_do_trans_count_utf8(pTHX_ SV *sv)/* SPC - OK */ if (!SvUTF8(sv)) { U8 *t = s, *e = s + len; while (t < e) - if ((hibit = !UTF8_IS_ASCII(*t++))) + if ((hibit = !UTF8_IS_INVARIANT(*t++))) break; if (hibit) start = s = bytes_to_utf8(s, &len); @@ -453,7 +453,7 @@ S_do_trans_complex_utf8(pTHX_ SV *sv) /* SPC - NOT OK */ if (!isutf8) { U8 *t = s, *e = s + len; while (t < e) - if ((hibit = !UTF8_IS_ASCII(*t++))) + if ((hibit = !UTF8_IS_INVARIANT(*t++))) break; if (hibit) s = bytes_to_utf8(s, &len); |