diff options
| author | Richard M. Stallman | 1994-09-17 00:41:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-09-17 00:41:40 +0000 |
| commit | 5647f9794b2e4770399556c7d4a4c6fc45dfb3f5 (patch) | |
| tree | 8514e540fd3bbe006711a46eba24ed471a68a617 /src | |
| parent | 1687325e19705137657af1e0170299708251cc21 (diff) | |
| download | emacs-5647f9794b2e4770399556c7d4a4c6fc45dfb3f5.tar.gz emacs-5647f9794b2e4770399556c7d4a4c6fc45dfb3f5.zip | |
(CHECK_IMPURE, all versions): Use EMACS_INT.
Diffstat (limited to 'src')
| -rw-r--r-- | src/puresize.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/puresize.h b/src/puresize.h index 0391bc380b8..3aa6e75c2dc 100644 --- a/src/puresize.h +++ b/src/puresize.h | |||
| @@ -40,7 +40,7 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | |||
| 40 | /* For machines like APOLLO where text and data can go anywhere | 40 | /* For machines like APOLLO where text and data can go anywhere |
| 41 | in virtual memory. */ | 41 | in virtual memory. */ |
| 42 | #define CHECK_IMPURE(obj) \ | 42 | #define CHECK_IMPURE(obj) \ |
| 43 | { extern int pure[]; \ | 43 | { extern EMACS_INT pure[]; \ |
| 44 | if ((PNTR_COMPARISON_TYPE) XPNTR (obj) < (PNTR_COMPARISON_TYPE) ((char *) pure + PURESIZE) \ | 44 | if ((PNTR_COMPARISON_TYPE) XPNTR (obj) < (PNTR_COMPARISON_TYPE) ((char *) pure + PURESIZE) \ |
| 45 | && (PNTR_COMPARISON_TYPE) XPNTR (obj) >= (PNTR_COMPARISON_TYPE) pure) \ | 45 | && (PNTR_COMPARISON_TYPE) XPNTR (obj) >= (PNTR_COMPARISON_TYPE) pure) \ |
| 46 | pure_write_error (); } | 46 | pure_write_error (); } |
| @@ -50,14 +50,14 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | |||
| 50 | 50 | ||
| 51 | /* when PNTR_COMPARISON_TYPE is not the default (unsigned int) */ | 51 | /* when PNTR_COMPARISON_TYPE is not the default (unsigned int) */ |
| 52 | #define CHECK_IMPURE(obj) \ | 52 | #define CHECK_IMPURE(obj) \ |
| 53 | { extern int my_edata; \ | 53 | { extern EMACS_INT my_edata; \ |
| 54 | if ((PNTR_COMPARISON_TYPE) XPNTR (obj) < (PNTR_COMPARISON_TYPE) &my_edata) \ | 54 | if ((PNTR_COMPARISON_TYPE) XPNTR (obj) < (PNTR_COMPARISON_TYPE) &my_edata) \ |
| 55 | pure_write_error (); } | 55 | pure_write_error (); } |
| 56 | 56 | ||
| 57 | #else /* not VIRT_ADDRESS_VARIES, not PNTR_COMPARISON_TYPE */ | 57 | #else /* not VIRT_ADDRESS_VARIES, not PNTR_COMPARISON_TYPE */ |
| 58 | 58 | ||
| 59 | #define CHECK_IMPURE(obj) \ | 59 | #define CHECK_IMPURE(obj) \ |
| 60 | { extern int my_edata; \ | 60 | { extern EMACS_INT my_edata; \ |
| 61 | if (XPNTR (obj) < (unsigned int) &my_edata) \ | 61 | if (XPNTR (obj) < (unsigned int) &my_edata) \ |
| 62 | pure_write_error (); } | 62 | pure_write_error (); } |
| 63 | 63 | ||