diff options
| author | Kenichi Handa <handa@m17n.org> | 1997-02-28 01:40:51 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 1997-02-28 01:40:51 +0000 |
| commit | 0e35bfd8d0d6a9910b069c61e75bc09919ac942f (patch) | |
| tree | 7cff24ac86744a4be80290bde5395c293d1d33fb /src/syntax.h | |
| parent | 78f9a1f70378f28233b721066bd4f31220f25af6 (diff) | |
| download | emacs-0e35bfd8d0d6a9910b069c61e75bc09919ac942f.tar.gz | |
(SET_RAW_SYNTAX_ENTRY, SYNTAX_ENTRY): Cast arg C to
`unsigned char' before indexing syntax table directly.
Diffstat (limited to 'src/syntax.h')
| -rw-r--r-- | src/syntax.h | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/src/syntax.h b/src/syntax.h index a9cbb1dd901..ee6466a691a 100644 --- a/src/syntax.h +++ b/src/syntax.h @@ -53,10 +53,10 @@ enum syntaxcode /* 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 @@ extern Lisp_Object syntax_parent_lookup (); 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. */ |