226 |
if (NILP (current_buffer->enable_multibyte_characters) \ |
if (NILP (current_buffer->enable_multibyte_characters) \ |
227 |
&& ! print_escape_multibyte) \ |
&& ! print_escape_multibyte) \ |
228 |
specbind (Qprint_escape_multibyte, Qt); \ |
specbind (Qprint_escape_multibyte, Qt); \ |
|
if (! NILP (current_buffer->enable_multibyte_characters) \ |
|
|
&& ! print_escape_nonascii) \ |
|
|
specbind (Qprint_escape_nonascii, Qt); \ |
|
229 |
if (print_buffer != 0) \ |
if (print_buffer != 0) \ |
230 |
{ \ |
{ \ |
231 |
string = make_string_from_bytes (print_buffer, \ |
string = make_string_from_bytes (print_buffer, \ |
1381 |
/* 1 means we must ensure that the next character we output |
/* 1 means we must ensure that the next character we output |
1382 |
cannot be taken as part of a hex character escape. */ |
cannot be taken as part of a hex character escape. */ |
1383 |
int need_nonhex = 0; |
int need_nonhex = 0; |
1384 |
|
int multibyte = STRING_MULTIBYTE (obj); |
1385 |
|
|
1386 |
GCPRO1 (obj); |
GCPRO1 (obj); |
1387 |
|
|
1402 |
int len; |
int len; |
1403 |
int c; |
int c; |
1404 |
|
|
1405 |
if (STRING_MULTIBYTE (obj)) |
if (multibyte) |
1406 |
{ |
{ |
1407 |
c = STRING_CHAR_AND_LENGTH (str + i_byte, |
c = STRING_CHAR_AND_LENGTH (str + i_byte, |
1408 |
size_byte - i_byte, len); |
size_byte - i_byte, len); |
1426 |
PRINTCHAR ('\\'); |
PRINTCHAR ('\\'); |
1427 |
PRINTCHAR ('f'); |
PRINTCHAR ('f'); |
1428 |
} |
} |
1429 |
else if (! SINGLE_BYTE_CHAR_P (c) && print_escape_multibyte) |
else if (multibyte && ! ASCII_BYTE_P (c) |
1430 |
|
&& (print_escape_multibyte || print_escape_nonascii)) |
1431 |
{ |
{ |
1432 |
/* When multibyte is disabled, |
/* When multibyte is disabled, |
1433 |
print multibyte string chars using hex escapes. */ |
print multibyte string chars using hex escapes. */ |
1436 |
strout (outbuf, -1, -1, printcharfun, 0); |
strout (outbuf, -1, -1, printcharfun, 0); |
1437 |
need_nonhex = 1; |
need_nonhex = 1; |
1438 |
} |
} |
1439 |
else if (SINGLE_BYTE_CHAR_P (c) && ! ASCII_BYTE_P (c) |
else if (! multibyte |
1440 |
|
&& SINGLE_BYTE_CHAR_P (c) && ! ASCII_BYTE_P (c) |
1441 |
&& print_escape_nonascii) |
&& print_escape_nonascii) |
1442 |
{ |
{ |
1443 |
/* When printing in a multibyte buffer |
/* When printing in a multibyte buffer |