diff options
Diffstat (limited to 'src/puresize.h')
| -rw-r--r-- | src/puresize.h | 18 |
1 files changed, 2 insertions, 16 deletions
diff --git a/src/puresize.h b/src/puresize.h index c26c496a757..e854dc585e8 100644 --- a/src/puresize.h +++ b/src/puresize.h | |||
| @@ -1,5 +1,5 @@ | |||
| 1 | /* How much read-only Lisp storage a dumped Emacs needs. | 1 | /* How much read-only Lisp storage a dumped Emacs needs. |
| 2 | Copyright (C) 1993, 2001-2011 Free Software Foundation, Inc. | 2 | Copyright (C) 1993, 2001-2012 Free Software Foundation, Inc. |
| 3 | 3 | ||
| 4 | This file is part of GNU Emacs. | 4 | This file is part of GNU Emacs. |
| 5 | 5 | ||
| @@ -75,21 +75,7 @@ extern void pure_write_error (void) NO_RETURN; | |||
| 75 | 75 | ||
| 76 | /* Define PURE_P. */ | 76 | /* Define PURE_P. */ |
| 77 | 77 | ||
| 78 | #ifdef VIRT_ADDR_VARIES | ||
| 79 | /* For machines where text and data can go anywhere | ||
| 80 | in virtual memory. */ | ||
| 81 | |||
| 82 | extern EMACS_INT pure[]; | 78 | extern EMACS_INT pure[]; |
| 83 | 79 | ||
| 84 | #define PURE_P(obj) \ | 80 | #define PURE_P(obj) \ |
| 85 | ((PNTR_COMPARISON_TYPE) XPNTR (obj) < (PNTR_COMPARISON_TYPE) ((char *) pure + PURESIZE) \ | 81 | ((uintptr_t) XPNTR (obj) - (uintptr_t) pure <= PURESIZE) |
| 86 | && (PNTR_COMPARISON_TYPE) XPNTR (obj) >= (PNTR_COMPARISON_TYPE) pure) | ||
| 87 | |||
| 88 | #else /* not VIRT_ADDR_VARIES */ | ||
| 89 | |||
| 90 | extern char my_edata[]; | ||
| 91 | |||
| 92 | #define PURE_P(obj) \ | ||
| 93 | ((PNTR_COMPARISON_TYPE) XPNTR (obj) < (PNTR_COMPARISON_TYPE) my_edata) | ||
| 94 | |||
| 95 | #endif /* VIRT_ADDRESS_VARIES */ | ||