Mercurial > emacs
changeset 17127:ab43d13fdfd5
(SET_RAW_SYNTAX_ENTRY, SYNTAX_ENTRY): Cast arg C to
`unsigned char' before indexing syntax table directly.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Fri, 28 Feb 1997 01:40:51 +0000 |
| parents | f8d7263cce09 |
| children | 6de8cf26e115 |
| files | src/syntax.h |
| diffstat | 1 files changed, 10 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/src/syntax.h Fri Feb 28 01:38:57 1997 +0000 +++ b/src/syntax.h Fri Feb 28 01:40:51 1997 +0000 @@ -53,10 +53,10 @@ /* Set the syntax entry VAL for char C in table TABLE. */ -#define SET_RAW_SYNTAX_ENTRY(table, c, val) \ - ((unsigned)(c) < 128 \ - ? (XCHAR_TABLE (table)->contents[(unsigned) (c)] = (val)) \ - : Faset ((table), (unsigned) (c), (val))) +#define SET_RAW_SYNTAX_ENTRY(table, c, val) \ + ((c) < CHAR_TABLE_ORDINARY_SLOTS \ + ? (XCHAR_TABLE (table)->contents[(unsigned char) (c)] = (val)) \ + : Faset ((table), make_number (c), (val))) /* Fetch the syntax entry for char C in syntax table TABLE. This macro is called only when C is less than CHAR_TABLE_ORDINARY_SLOTS. @@ -89,10 +89,12 @@ This returns the whole entry (normally a cons cell). Do Inheritance. */ -#define SYNTAX_ENTRY(c) \ - ((unsigned) (c) < CHAR_TABLE_ORDINARY_SLOTS \ - ? SYNTAX_ENTRY_FOLLOW_PARENT (current_buffer->syntax_table, (unsigned) (c))\ - : Faref (current_buffer->syntax_table, make_number (c))) +#define SYNTAX_ENTRY(c) \ + ((c) < CHAR_TABLE_ORDINARY_SLOTS \ + ? SYNTAX_ENTRY_FOLLOW_PARENT (current_buffer->syntax_table, \ + (unsigned char) (c)) \ + : Faref (current_buffer->syntax_table, make_number ((c)))) + /* Extract the information from the entry for character C in the current syntax table. */