Mercurial > hg > xemacs-beta

diff src/lisp-disunion.h @ 296:5a79be0ef6a8 r21-0b46

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b46
author cvs
date Mon, 13 Aug 2007 10:38:46 +0200
parents c5d627a313b1
children 8626e4521993
line wrap: on
line diff
--- a/src/lisp-disunion.h	Mon Aug 13 10:38:02 2007 +0200
+++ b/src/lisp-disunion.h	Mon Aug 13 10:38:46 2007 +0200
@@ -126,7 +126,7 @@
 #else /* !USE_MINIMAL_TAGBITS */
 
 # define MARKBIT (1UL << VALBITS)
-# define XMARKBIT(x) ((x) & MARKBIT)
+# define XMARKBIT(x) (((x) & MARKBIT) != 0)
 # define XMARK(x) ((void) ((x) |= MARKBIT))
 # define XUNMARK(x) ((void) ((x) &= ~MARKBIT))
 # define make_obj(vartype, value) \