Mercurial > emacs
comparison src/lread.c @ 89453:85b37317d5ea
(read1): While reading a string, set force_singlebyte
and force_multibyte correctly.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Fri, 30 May 2003 06:04:17 +0000 |
parents | 56c80a95cb5b |
children | 2f877ed80fa6 |
comparison
equal
deleted
inserted
replaced
89452:6cc7c4aa53cc | 89453:85b37317d5ea |
---|---|
2367 p += CHAR_STRING (c, (unsigned char *) p); | 2367 p += CHAR_STRING (c, (unsigned char *) p); |
2368 } | 2368 } |
2369 else | 2369 else |
2370 { | 2370 { |
2371 p += CHAR_STRING (c, (unsigned char *) p); | 2371 p += CHAR_STRING (c, (unsigned char *) p); |
2372 if (CHAR_BYTE8_P (c)) | |
2373 force_singlebyte = 1; | |
2374 else if (! ASCII_CHAR_P (c)) | |
2375 force_multibyte = 1; | |
2372 } | 2376 } |
2373 nchars++; | 2377 nchars++; |
2374 } | 2378 } |
2375 if (c < 0) | 2379 if (c < 0) |
2376 end_of_file_error (); | 2380 end_of_file_error (); |