aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/syntax.h15
1 files changed, 6 insertions, 9 deletions
diff --git a/src/syntax.h b/src/syntax.h
index 69a73c2fe9f..07e0a6ca675 100644
--- a/src/syntax.h
+++ b/src/syntax.h
@@ -122,25 +122,22 @@ extern Lisp_Object syntax_parent_lookup ();
122 : syntax_temp)) 122 : syntax_temp))
123 123
124#define SYNTAX(c) \ 124#define SYNTAX(c) \
125 (syntax_temp \ 125 (syntax_temp = SYNTAX_ENTRY ((c)), \
126 = SYNTAX_ENTRY (current_buffer->syntax_table, (c)), \
127 (CONSP (syntax_temp) \ 126 (CONSP (syntax_temp) \
128 ? (enum syntaxcode) (XINT (XCONS (syntax_temp)->car) & 0xff) \ 127 ? (enum syntaxcode) (XINT (XCONS (syntax_temp)->car) & 0xff) \
129 : wrong_type_argument (Qconsp, syntax_temp)) }) 128 : wrong_type_argument (Qconsp, syntax_temp)))
130 129
131#define SYNTAX_WITH_FLAGS(c) \ 130#define SYNTAX_WITH_FLAGS(c) \
132 (syntax_temp \ 131 (syntax_temp = SYNTAX_ENTRY ((c)), \
133 = SYNTAX_ENTRY (current_buffer->syntax_table, (c)), \
134 (CONSP (syntax_temp) \ 132 (CONSP (syntax_temp) \
135 ? XINT (XCONS (syntax_temp)->car) \ 133 ? XINT (XCONS (syntax_temp)->car) \
136 : wrong_type_argument (Qconsp, syntax_temp)) }) 134 : wrong_type_argument (Qconsp, syntax_temp)))
137 135
138#define SYNTAX_MATCH(c) \ 136#define SYNTAX_MATCH(c) \
139 (syntax_temp \ 137 (syntax_temp = SYNTAX_ENTRY ((c)), \
140 = SYNTAX_ENTRY (current_buffer->syntax_table, (c)), \
141 (CONSP (syntax_temp) \ 138 (CONSP (syntax_temp) \
142 ? XINT (XCONS (syntax_temp)->cdr) \ 139 ? XINT (XCONS (syntax_temp)->cdr) \
143 : wrong_type_argument (Qconsp, syntax_temp)) }) 140 : wrong_type_argument (Qconsp, syntax_temp)))
144#endif 141#endif
145 142
146/* Then there are six single-bit flags that have the following meanings: 143/* Then there are six single-bit flags that have the following meanings: