Mercurial > emacs
comparison src/print.c @ 29016:35074eb2a443
(print_object): Use FETCH_STRING_CHAR_ADVANCE
unconditionally.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Sat, 20 May 2000 00:04:05 +0000 |
parents | f8b0ac62f238 |
children | 5b727419f3aa |
comparison
equal
deleted
inserted
replaced
29015:ec2827214bf3 | 29016:35074eb2a443 |
---|---|
1432 | 1432 |
1433 for (i = 0, i_byte = 0; i_byte < size_byte;) | 1433 for (i = 0, i_byte = 0; i_byte < size_byte;) |
1434 { | 1434 { |
1435 /* Here, we must convert each multi-byte form to the | 1435 /* Here, we must convert each multi-byte form to the |
1436 corresponding character code before handing it to PRINTCHAR. */ | 1436 corresponding character code before handing it to PRINTCHAR. */ |
1437 | 1437 FETCH_STRING_CHAR_ADVANCE (c, name, i, i_byte); |
1438 if (STRING_MULTIBYTE (name)) | |
1439 FETCH_STRING_CHAR_ADVANCE (c, name, i, i_byte); | |
1440 else | |
1441 c = XSTRING (name)->data[i_byte++]; | |
1442 | |
1443 QUIT; | 1438 QUIT; |
1444 | 1439 |
1445 if (escapeflag) | 1440 if (escapeflag) |
1446 { | 1441 { |
1447 if (c == '\"' || c == '\\' || c == '\'' | 1442 if (c == '\"' || c == '\\' || c == '\'' |