Mercurial > emacs
comparison src/puresize.h @ 11236:abd63066ddf0
(CHECK_IMPURE): Remove & from before my_edata.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Fri, 07 Apr 1995 02:59:03 +0000 |
parents | 49b437fefafd |
children | ac7375e60931 |
comparison
equal
deleted
inserted
replaced
11235:e6bdaaa6ce1b | 11236:abd63066ddf0 |
---|---|
72 #ifdef PNTR_COMPARISON_TYPE | 72 #ifdef PNTR_COMPARISON_TYPE |
73 | 73 |
74 /* when PNTR_COMPARISON_TYPE is not the default (unsigned int) */ | 74 /* when PNTR_COMPARISON_TYPE is not the default (unsigned int) */ |
75 #define CHECK_IMPURE(obj) \ | 75 #define CHECK_IMPURE(obj) \ |
76 { extern char my_edata[]; \ | 76 { extern char my_edata[]; \ |
77 if ((PNTR_COMPARISON_TYPE) XPNTR (obj) < (PNTR_COMPARISON_TYPE) &my_edata) \ | 77 if ((PNTR_COMPARISON_TYPE) XPNTR (obj) < (PNTR_COMPARISON_TYPE) my_edata) \ |
78 pure_write_error (); } | 78 pure_write_error (); } |
79 | 79 |
80 #else /* not VIRT_ADDRESS_VARIES, not PNTR_COMPARISON_TYPE */ | 80 #else /* not VIRT_ADDRESS_VARIES, not PNTR_COMPARISON_TYPE */ |
81 | 81 |
82 #define CHECK_IMPURE(obj) \ | 82 #define CHECK_IMPURE(obj) \ |
83 { extern char my_edata[]; \ | 83 { extern char my_edata[]; \ |
84 if (XPNTR (obj) < (unsigned int) &my_edata) \ | 84 if (XPNTR (obj) < (unsigned int) my_edata) \ |
85 pure_write_error (); } | 85 pure_write_error (); } |
86 | 86 |
87 #endif /* PNTR_COMPARISON_TYPE */ | 87 #endif /* PNTR_COMPARISON_TYPE */ |
88 #endif /* VIRT_ADDRESS_VARIES */ | 88 #endif /* VIRT_ADDRESS_VARIES */ |
89 | 89 |