Lines Matching defs:utf8
2220 if (PerlIO_isutf8(fp)) { /* If the stream is utf8 ... */
2221 if (!SvUTF8(sv)) { /* Convert to utf8 if necessary */
2229 } /* else stream isn't utf8 */
2230 else if (DO_UTF8(sv)) { /* But if is utf8 internally, attempt to
2233 bool utf8 = TRUE;
2234 U8 * const result = bytes_from_utf8((const U8*) tmps, &tmplen, &utf8);
2235 if (!utf8) {
2237 /* Here, succeeded in downgrading from utf8. Set up to below
2243 else { /* Non-utf8 output stream, but string only representable in
2244 utf8 */
2251 * in utf8 by using check_utf8_print(), but not doing so,