Mercurial > hg > xemacs-beta

comparison src/syntax.h @ 404:2f8bb876ab1d r21-2-32

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-32
author cvs
date Mon, 13 Aug 2007 11:16:07 +0200
parents 74fd4e045ea6
children 697ef44129c6
comparison
equal deleted inserted replaced
403:9f011ab08d48 404:2f8bb876ab1d
70 /* Return the syntax code for a particular character and mirror table. */ 70 /* Return the syntax code for a particular character and mirror table. */
71 71
72 #define SYNTAX_CODE_UNSAFE(table, c) \ 72 #define SYNTAX_CODE_UNSAFE(table, c) \
73 XINT (CHAR_TABLE_VALUE_UNSAFE (table, c)) 73 XINT (CHAR_TABLE_VALUE_UNSAFE (table, c))
74 74
75 INLINE int SYNTAX_CODE (Lisp_Char_Table *table, Emchar c); 75 INLINE_HEADER int SYNTAX_CODE (Lisp_Char_Table *table, Emchar c);
76 INLINE int 76 INLINE_HEADER int
77 SYNTAX_CODE (Lisp_Char_Table *table, Emchar c) 77 SYNTAX_CODE (Lisp_Char_Table *table, Emchar c)
78 { 78 {
79 return SYNTAX_CODE_UNSAFE (table, c); 79 return SYNTAX_CODE_UNSAFE (table, c);
80 } 80 }
81 81
83 ((enum syntaxcode) (SYNTAX_CODE_UNSAFE (table, c) & 0177)) 83 ((enum syntaxcode) (SYNTAX_CODE_UNSAFE (table, c) & 0177))
84 84
85 #define SYNTAX_FROM_CODE(code) ((enum syntaxcode) ((code) & 0177)) 85 #define SYNTAX_FROM_CODE(code) ((enum syntaxcode) ((code) & 0177))
86 #define SYNTAX(table, c) SYNTAX_FROM_CODE (SYNTAX_CODE (table, c)) 86 #define SYNTAX(table, c) SYNTAX_FROM_CODE (SYNTAX_CODE (table, c))
87 87
88 INLINE int WORD_SYNTAX_P (Lisp_Char_Table *table, Emchar c); 88 INLINE_HEADER int WORD_SYNTAX_P (Lisp_Char_Table *table, Emchar c);
89 INLINE int 89 INLINE_HEADER int
90 WORD_SYNTAX_P (Lisp_Char_Table *table, Emchar c) 90 WORD_SYNTAX_P (Lisp_Char_Table *table, Emchar c)
91 { 91 {
92 return SYNTAX (table, c) == Sword; 92 return SYNTAX (table, c) == Sword;
93 } 93 }
94 94