mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-04 02:51:31 -08:00
Code Issues Projects Releases Wiki Activity

(SET_RAW_SYNTAX_ENTRY, SYNTAX_ENTRY): Adjusted for the change of

Browse source 
CHAR_TABLE_ORDINARY_SLOTS.
This commit is contained in:
Kenichi Handa 1997-03-18 23:31:34 +00:00
parent 085d590815
commit 9ca6ab7d30
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/syntax.h
View file

@ -54,7 +54,7 @@ enum syntaxcode
/* Set the syntax entry VAL for char C in table TABLE. */
#define SET_RAW_SYNTAX_ENTRY(table, c, val) \
((c) < CHAR_TABLE_ORDINARY_SLOTS \
((c) < CHAR_TABLE_SINGLE_BYTE_SLOTS \
? (XCHAR_TABLE (table)->contents[(unsigned char) (c)] = (val)) \
: Faset ((table), make_number (c), (val)))
@ -90,7 +90,7 @@ extern Lisp_Object syntax_parent_lookup ();
Do Inheritance. */
#define SYNTAX_ENTRY(c) \
((c) < CHAR_TABLE_ORDINARY_SLOTS \
((c) < CHAR_TABLE_SINGLE_BYTE_SLOTS \
? SYNTAX_ENTRY_FOLLOW_PARENT (current_buffer->syntax_table, \
(unsigned char) (c)) \
: Faref (current_buffer->syntax_table, make_number ((c))))