summaryrefslogtreecommitdiff
path: root/doop.c
diff options
context:
space:
mode:
authorNick Ing-Simmons <nik@tiuk.ti.com>2001-03-17 17:44:16 +0000
committerNick Ing-Simmons <nik@tiuk.ti.com>2001-03-17 17:44:16 +0000
commitd742c382eed38a7010c93d369ad6896d826c21d6 (patch)
tree1335117a4c19316510dfc6f57f1f626fe80063b9 /doop.c
parent73d6d5898f99c77c19a56e8934a3f0d8ab9918b8 (diff)
downloadperl-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.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/doop.c b/doop.c
index 1a1ba8f427..a6391b4588 100644
--- a/doop.c
+++ b/doop.c
@@ -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);