From: Richard M. Stallman Date: Sun, 29 Oct 1995 04:38:08 +0000 (+0000) Subject: (SYNTAX, SYNTAX_WITH_FLAGS, SYNTAX_MATCH): Fix the non-GCC definitions. X-Git-Tag: emacs-19.34~2542 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9d40ebd2443bb2ec1db0284b6738897e41917c6a;p=emacs.git (SYNTAX, SYNTAX_WITH_FLAGS, SYNTAX_MATCH): Fix the non-GCC definitions. --- 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 (); : syntax_temp)) #define SYNTAX(c) \ - (syntax_temp \ - = SYNTAX_ENTRY (current_buffer->syntax_table, (c)), \ + (syntax_temp = SYNTAX_ENTRY ((c)), \ (CONSP (syntax_temp) \ ? (enum syntaxcode) (XINT (XCONS (syntax_temp)->car) & 0xff) \ - : wrong_type_argument (Qconsp, syntax_temp)) }) + : wrong_type_argument (Qconsp, syntax_temp))) #define SYNTAX_WITH_FLAGS(c) \ - (syntax_temp \ - = SYNTAX_ENTRY (current_buffer->syntax_table, (c)), \ + (syntax_temp = SYNTAX_ENTRY ((c)), \ (CONSP (syntax_temp) \ ? XINT (XCONS (syntax_temp)->car) \ - : wrong_type_argument (Qconsp, syntax_temp)) }) + : wrong_type_argument (Qconsp, syntax_temp))) #define SYNTAX_MATCH(c) \ - (syntax_temp \ - = SYNTAX_ENTRY (current_buffer->syntax_table, (c)), \ + (syntax_temp = SYNTAX_ENTRY ((c)), \ (CONSP (syntax_temp) \ ? XINT (XCONS (syntax_temp)->cdr) \ - : wrong_type_argument (Qconsp, syntax_temp)) }) + : wrong_type_argument (Qconsp, syntax_temp))) #endif /* Then there are six single-bit flags that have the following meanings: