diff options
author | Karl Williamson <khw@cpan.org> | 2014-11-25 12:18:42 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2014-11-26 09:18:33 -0700 |
commit | 9f10db87f54f2a85594e3661927a9b6128c1f425 (patch) | |
tree | fbb32d9c0629ccea6b57538b401f577288b4b35f /pp_sys.c | |
parent | 09902b1fc2af1bca16bf40b6f6dd1e420562d9e2 (diff) | |
download | perl-9f10db87f54f2a85594e3661927a9b6128c1f425.tar.gz |
Change core to use is_invariant_string()
is_ascii_string's name has misled me in the past; the new name is
clearer.
Diffstat (limited to 'pp_sys.c')
-rw-r--r-- | pp_sys.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -3486,12 +3486,12 @@ PP(pp_fttext) #endif assert(len); - if (! is_ascii_string((U8 *) s, len)) { + if (! is_invariant_string((U8 *) s, len)) { const U8 *ep; - /* Here contains a non-ASCII. See if the entire string is UTF-8. But - * the buffer may end in a partial character, so consider it UTF-8 if - * the first non-UTF8 char is an ending partial */ + /* Here contains a variant under UTF-8 . See if the entire string is + * UTF-8. But the buffer may end in a partial character, so consider + * it UTF-8 if the first non-UTF8 char is an ending partial */ if (is_utf8_string_loc((U8 *) s, len, &ep) || ep + UTF8SKIP(ep) > (U8 *) (s + len)) { |