Mercurial > emacs
comparison src/casefiddle.c @ 46420:1ab8a78692f4
* casefiddle.c (casify_object): Use SSET.
author | Ken Raeburn <raeburn@raeburn.org> |
---|---|
date | Tue, 16 Jul 2002 15:48:59 +0000 |
parents | 40db0673e6f0 |
children | 1099445a76d0 |
comparison
equal
deleted
inserted
replaced
46419:46ff766afaaf | 46420:1ab8a78692f4 |
---|---|
88 fall out to the multibyte case. */ | 88 fall out to the multibyte case. */ |
89 if (multibyte ? ! ASCII_BYTE_P (c) | 89 if (multibyte ? ! ASCII_BYTE_P (c) |
90 : ! SINGLE_BYTE_CHAR_P (c)) | 90 : ! SINGLE_BYTE_CHAR_P (c)) |
91 break; | 91 break; |
92 | 92 |
93 SREF (obj, i) = c; | 93 SSET (obj, i, c); |
94 if ((int) flag >= (int) CASE_CAPITALIZE) | 94 if ((int) flag >= (int) CASE_CAPITALIZE) |
95 inword = SYNTAX (c) == Sword; | 95 inword = SYNTAX (c) == Sword; |
96 i++; | 96 i++; |
97 } | 97 } |
98 | 98 |