Mercurial > hg > xemacs-beta

comparison src/m/att3b.h @ 203:850242ba4a81 r20-3b28

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b28
author cvs
date Mon, 13 Aug 2007 10:02:21 +0200
parents 0132846995bd
children a86b2b5e0111
comparison
equal deleted inserted replaced
202:61eefc8fc970 203:850242ba4a81
114 #if u3b2 || u3b5 || u3b15 114 #if u3b2 || u3b5 || u3b15
115 115
116 /* On 3b2/5/15, data space has high order bit on. */ 116 /* On 3b2/5/15, data space has high order bit on. */
117 #define VALBITS 27 117 #define VALBITS 27
118 #define VALMASK (((1<<VALBITS) - 1) | (1 << 31)) 118 #define VALMASK (((1<<VALBITS) - 1) | (1 << 31))
119 #define XTYPE(a) ((enum Lisp_Type) (((a) >> VALBITS) & GCTYPEMASK)) 119 /* XEmacs: markbit is between type bits and value bits */
120 /* #define XTYPE(a) ((enum Lisp_Type) (((a) >> VALBITS) & GCTYPEMASK)) */
121 #define XTYPE(a) ((enum Lisp_Type) (((a) >> ((VALBITS) + 1)) & GCTYPEMASK))
120 122
121 #endif /* 3b2, 3b5 or 3b15 */ 123 #endif /* 3b2, 3b5 or 3b15 */
122 124
123 #define TEXT_START 0 125 #define TEXT_START 0
124 126