Mercurial > hg > xemacs-beta

comparison src/lisp-union.h @ 213:78f53ef88e17 r20-4b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-4b5
author cvs
date Mon, 13 Aug 2007 10:06:47 +0200
parents e45d5e7c476e
children 11cf20601dec
comparison
equal deleted inserted replaced
212:d8688acf4c5b 213:78f53ef88e17
199 * zero. 199 * zero.
200 */ 200 */
201 # define XMARKBIT(a) ((a).gu.markbit) 201 # define XMARKBIT(a) ((a).gu.markbit)
202 # define XMARK(a) ((void) (XMARKBIT (a) = 1)) 202 # define XMARK(a) ((void) (XMARKBIT (a) = 1))
203 # define XUNMARK(a) ((void) (XMARKBIT (a) = 0)) 203 # define XUNMARK(a) ((void) (XMARKBIT (a) = 0))
204 #else
205 # define XUNMARK(a) DO_NOTHING
204 #endif 206 #endif
205 207
206 /* Use this for turning a (void *) into a Lisp_Object, as when the 208 /* Use this for turning a (void *) into a Lisp_Object, as when the
207 Lisp_Object is passed into a toolkit callback function */ 209 Lisp_Object is passed into a toolkit callback function */
208 #define VOID_TO_LISP(larg,varg) \ 210 #define VOID_TO_LISP(larg,varg) \