Mercurial > emacs
comparison src/syntax.h @ 13318:94a4b6e9d310
(SYNTAX, SYNTAX_WITH_FLAGS, SYNTAX_MATCH): Fix the non-GCC definitions.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 29 Oct 1995 04:38:08 +0000 |
parents | ba670977cceb |
children | 3b50e2642bfd |
comparison
equal
deleted
inserted
replaced
13317:877d62af45a9 | 13318:94a4b6e9d310 |
---|---|
120 ? (syntax_temp \ | 120 ? (syntax_temp \ |
121 = syntax_parent_lookup (current_buffer->syntax_table, (c))) \ | 121 = syntax_parent_lookup (current_buffer->syntax_table, (c))) \ |
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: |
147 1. This character is the first of a two-character comment-start sequence. | 144 1. This character is the first of a two-character comment-start sequence. |
148 2. This character is the second of a two-character comment-start sequence. | 145 2. This character is the second of a two-character comment-start sequence. |