# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 964709271 0
# Node ID 552c97239a7757990e4a6db557096d48c22e6299
# Parent  a0367b50672257b5adebd99485b5b1ff4e1d83a9
(XUINT, XSET, XUNMARK) [_LP64]: Don't define.

diff -r a0367b506722 -r 552c97239a77 src/m/iris4d.h
--- a/src/m/iris4d.h	Thu Jul 27 14:47:17 2000 +0000
+++ b/src/m/iris4d.h	Thu Jul 27 14:47:51 2000 +0000
@@ -174,6 +174,7 @@
 #undef STACK_DIRECTION
 #define STACK_DIRECTION -1
 
+#ifndef _LP64
 /* The standard definitions of these macros would work ok,
    but these are faster because the constants are short.  */
 
@@ -182,9 +183,8 @@
 #define XSET(var, type, ptr) \
    ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS))
 
-#define XMARKBIT(a) ((a) < 0)
-#define XSETMARKBIT(a,b) ((a) = ((a) & ~MARKBIT) | ((b) ? MARKBIT : 0))
 #define XUNMARK(a) ((a) = (((unsigned)(a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS))
+#endif /* _LP64 */
 
 #ifndef __GNUC__
 /* Turn off some "helpful" error checks for type mismatches