# HG changeset patch # User Stefan Monnier # Date 1063396450 0 # Node ID 7afb553c7135511a07eca9d1af7a1c52c7e6265a # Parent 96d237d6be000f11aeab70b4d20217fbf3aa5249 (XMARKBIT, XUNMARK): Remove. diff -r 96d237d6be00 -r 7afb553c7135 src/m/hp800.h --- a/src/m/hp800.h Fri Sep 12 19:44:31 2003 +0000 +++ b/src/m/hp800.h Fri Sep 12 19:54:10 2003 +0000 @@ -67,12 +67,6 @@ #define XSET(var, type, ptr) \ ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) - -#define XMARKBIT(a) ((a) < 0) - -#if 0 /* Loses when sign bit of type field is set. */ -#define XUNMARK(a) ((a) = (((a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) -#endif /* Common definitions for HPUX and GNU/Linux. */ diff -r 96d237d6be00 -r 7afb553c7135 src/m/iris4d.h --- a/src/m/iris4d.h Fri Sep 12 19:44:31 2003 +0000 +++ b/src/m/iris4d.h Fri Sep 12 19:54:10 2003 +0000 @@ -1,5 +1,5 @@ /* machine description file for Iris-4D machines. Use with s/irix*.h. - Copyright (C) 1987, 2002 Free Software Foundation, Inc. + Copyright (C) 1987, 2002, 2003 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -170,8 +170,6 @@ #define XSET(var, type, ptr) \ ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) - -#define XUNMARK(a) ((a) = (((unsigned)(a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) #endif /* _LP64 */ #ifndef __GNUC__ diff -r 96d237d6be00 -r 7afb553c7135 src/m/mips-siemens.h --- a/src/m/mips-siemens.h Fri Sep 12 19:44:31 2003 +0000 +++ b/src/m/mips-siemens.h Fri Sep 12 19:54:10 2003 +0000 @@ -1,5 +1,5 @@ /* m- file for Mips machines. - Copyright (C) 1987, 1992, 1993, 1995, 2002 Free Software Foundation, Inc. + Copyright (C) 1987,1992,1993,95,2002,03 Free Software Foundation, Inc. This file contains some changes for our SVR4 based SINIX-Mips 5.4. I hope this is helpful to port the emacs to our RM?00 series and @@ -158,10 +158,5 @@ ((int)(type) << VALBITS) \ + (((unsigned) (ptr) << (BITS_PER_INT-VALBITS)) >> (BITS_PER_INT-VALBITS))) -#define XUNMARK(a) \ - ((a) = \ - (((unsigned)(a) << (BITS_PER_INT-GCTYPEBITS-VALBITS)) \ - >> (BITS_PER_INT-GCTYPEBITS-VALBITS))) - /* arch-tag: a4f5c090-0bd5-48f0-9724-b7d531f9b6c8 (do not change this comment) */ diff -r 96d237d6be00 -r 7afb553c7135 src/m/mips.h --- a/src/m/mips.h Fri Sep 12 19:44:31 2003 +0000 +++ b/src/m/mips.h Fri Sep 12 19:54:10 2003 +0000 @@ -1,5 +1,5 @@ /* m- file for Mips machines. - Copyright (C) 1987, 1992, 1999, 2002 Free Software Foundation, Inc. + Copyright (C) 1987, 1992, 1999, 2002, 2003 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -170,11 +170,6 @@ ((var) = \ ((int)(type) << VALBITS) \ + (((unsigned) (ptr) << (BITS_PER_INT-VALBITS)) >> (BITS_PER_INT-VALBITS))) - -#define XUNMARK(a) \ - ((a) = \ - (((unsigned)(a) << (BITS_PER_INT-GCTYPEBITS-VALBITS)) \ - >> (BITS_PER_INT-GCTYPEBITS-VALBITS))) #if !defined (NEWSOS5) && !defined (__linux__) #ifdef USG diff -r 96d237d6be00 -r 7afb553c7135 src/m/news-r6.h --- a/src/m/news-r6.h Fri Sep 12 19:44:31 2003 +0000 +++ b/src/m/news-r6.h Fri Sep 12 19:54:10 2003 +0000 @@ -49,10 +49,5 @@ ((int)(type) << VALBITS) \ + (((unsigned) (ptr) << (BITS_PER_INT-VALBITS)) >> (BITS_PER_INT-VALBITS))) -#define XUNMARK(a) \ - ((a) = \ - (((unsigned)(a) << (BITS_PER_INT-GCTYPEBITS-VALBITS)) \ - >> (BITS_PER_INT-GCTYPEBITS-VALBITS))) - /* arch-tag: b9fd7b75-ba3c-46d4-8966-24381b13001b (do not change this comment) */ diff -r 96d237d6be00 -r 7afb553c7135 src/m/sr2k.h --- a/src/m/sr2k.h Fri Sep 12 19:44:31 2003 +0000 +++ b/src/m/sr2k.h Fri Sep 12 19:54:10 2003 +0000 @@ -67,12 +67,6 @@ #define XSET(var, type, ptr) \ ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) - -#define XMARKBIT(a) ((a) < 0) - -#if 0 /* Loses when sign bit of type field is set. */ -#define XUNMARK(a) ((a) = (((a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) -#endif /* #ifdef __hpux */ /* Now define a symbol for the cpu type, if your compiler