aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorKenichi Handa1999-12-15 00:20:44 +0000
committerKenichi Handa1999-12-15 00:20:44 +0000
commitaa9b6dd66b99ae283e373fe72e6dc006c1509541 (patch)
treed2798d04b0a65b71bccb66e234fbe6b3c764f0f3 /src
parentdaaa6ed868b751a019395c7233c9649e099cca85 (diff)
downloademacs-aa9b6dd66b99ae283e373fe72e6dc006c1509541.tar.gz
emacs-aa9b6dd66b99ae283e373fe72e6dc006c1509541.zip
(SYNTAX_ENTRY_INT): Delete codes for a composite
character.
Diffstat (limited to 'src')
-rw-r--r--src/syntax.h14
1 files changed, 6 insertions, 8 deletions
diff --git a/src/syntax.h b/src/syntax.h
index c2c3a0896d0..5036c4a2a16 100644
--- a/src/syntax.h
+++ b/src/syntax.h
@@ -105,14 +105,12 @@ extern Lisp_Object syntax_parent_lookup P_ ((Lisp_Object, 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, \ 112 : Faref (CURRENT_SYNTAX_TABLE, \
113 make_number (COMPOSITE_CHAR_P (c) \ 113 make_number (c)))
114 ? cmpchar_component ((c), 0, 1) \
115 : (c))))
116 114
117/* Extract the information from the entry for character C 115/* Extract the information from the entry for character C
118 in the current syntax table. */ 116 in the current syntax table. */