Mercurial > emacs
comparison src/syntax.h @ 23713:a31bf9d72c56
(SYNTAX_ENTRY_INT): For a composite character, check
the first component.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Mon, 16 Nov 1998 01:17:06 +0000 |
parents | 917424c9c149 |
children | 2a2d7ebaa018 |
comparison
equal
deleted
inserted
replaced
23712:5108cfb51c51 | 23713:a31bf9d72c56 |
---|---|
103 #else | 103 #else |
104 # define SYNTAX_ENTRY SYNTAX_ENTRY_INT | 104 # define SYNTAX_ENTRY SYNTAX_ENTRY_INT |
105 # define CURRENT_SYNTAX_TABLE current_buffer->syntax_table | 105 # define CURRENT_SYNTAX_TABLE current_buffer->syntax_table |
106 #endif | 106 #endif |
107 | 107 |
108 #define SYNTAX_ENTRY_INT(c) \ | 108 #define SYNTAX_ENTRY_INT(c) \ |
109 ((c) < CHAR_TABLE_SINGLE_BYTE_SLOTS \ | 109 ((c) < CHAR_TABLE_SINGLE_BYTE_SLOTS \ |
110 ? SYNTAX_ENTRY_FOLLOW_PARENT (CURRENT_SYNTAX_TABLE, \ | 110 ? SYNTAX_ENTRY_FOLLOW_PARENT (CURRENT_SYNTAX_TABLE, \ |
111 (unsigned char) (c)) \ | 111 (unsigned char) (c)) \ |
112 : Faref (CURRENT_SYNTAX_TABLE, make_number ((c)))) | 112 : Faref (CURRENT_SYNTAX_TABLE, \ |
113 make_number (COMPOSITE_CHAR_P (c) \ | |
114 ? cmpchar_component ((c), 0, 1) \ | |
115 : (c)))) | |
113 | 116 |
114 /* Extract the information from the entry for character C | 117 /* Extract the information from the entry for character C |
115 in the current syntax table. */ | 118 in the current syntax table. */ |
116 | 119 |
117 #ifdef __GNUC__ | 120 #ifdef __GNUC__ |