diff options
| author | Stefan Monnier | 2003-07-06 21:06:45 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2003-07-06 21:06:45 +0000 |
| commit | c74abe0afd969423d0be6b2477b146fbd8e27b18 (patch) | |
| tree | fd794c5ce9b088084e724432649b5c3c06299543 /src/m | |
| parent | 49723c0471a49ae0d66ab3e0aa0b771bbd85bd7e (diff) | |
| download | emacs-c74abe0afd969423d0be6b2477b146fbd8e27b18.tar.gz emacs-c74abe0afd969423d0be6b2477b146fbd8e27b18.zip | |
(XSETMARKBIT): Remove unused macro.
Diffstat (limited to 'src/m')
| -rw-r--r-- | src/m/hp800.h | 3 | ||||
| -rw-r--r-- | src/m/sr2k.h | 3 |
2 files changed, 2 insertions, 4 deletions
diff --git a/src/m/hp800.h b/src/m/hp800.h index 5e4e0fd0ec6..bc51b31836a 100644 --- a/src/m/hp800.h +++ b/src/m/hp800.h | |||
| @@ -1,5 +1,5 @@ | |||
| 1 | /* machine description file for hp9000 series 800 machines. | 1 | /* machine description file for hp9000 series 800 machines. |
| 2 | Copyright (C) 1987, 2002 Free Software Foundation, Inc. | 2 | Copyright (C) 1987, 2002, 2003 Free Software Foundation, Inc. |
| 3 | 3 | ||
| 4 | This file is part of GNU Emacs. | 4 | This file is part of GNU Emacs. |
| 5 | 5 | ||
| @@ -69,7 +69,6 @@ Boston, MA 02111-1307, USA. */ | |||
| 69 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) | 69 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) |
| 70 | 70 | ||
| 71 | #define XMARKBIT(a) ((a) < 0) | 71 | #define XMARKBIT(a) ((a) < 0) |
| 72 | #define XSETMARKBIT(a,b) ((a) = ((b) ? (a)|MARKBIT : (a) & ~MARKBIT)) | ||
| 73 | 72 | ||
| 74 | #if 0 /* Loses when sign bit of type field is set. */ | 73 | #if 0 /* Loses when sign bit of type field is set. */ |
| 75 | #define XUNMARK(a) ((a) = (((a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) | 74 | #define XUNMARK(a) ((a) = (((a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) |
diff --git a/src/m/sr2k.h b/src/m/sr2k.h index 4adf0f700fc..579432aa3b0 100644 --- a/src/m/sr2k.h +++ b/src/m/sr2k.h | |||
| @@ -1,5 +1,5 @@ | |||
| 1 | /* machine description file for Hitachi SR2001/SR2201 machines. | 1 | /* machine description file for Hitachi SR2001/SR2201 machines. |
| 2 | Copyright (C) 1996, 2002 Free Software Foundation, Inc. | 2 | Copyright (C) 1996, 2002, 2003 Free Software Foundation, Inc. |
| 3 | 3 | ||
| 4 | This file is part of GNU Emacs. | 4 | This file is part of GNU Emacs. |
| 5 | 5 | ||
| @@ -69,7 +69,6 @@ Boston, MA 02111-1307, USA. */ | |||
| 69 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) | 69 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) |
| 70 | 70 | ||
| 71 | #define XMARKBIT(a) ((a) < 0) | 71 | #define XMARKBIT(a) ((a) < 0) |
| 72 | #define XSETMARKBIT(a,b) ((a) = ((b) ? (a)|MARKBIT : (a) & ~MARKBIT)) | ||
| 73 | 72 | ||
| 74 | #if 0 /* Loses when sign bit of type field is set. */ | 73 | #if 0 /* Loses when sign bit of type field is set. */ |
| 75 | #define XUNMARK(a) ((a) = (((a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) | 74 | #define XUNMARK(a) ((a) = (((a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) |