diff options
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/lisp.h b/src/lisp.h index f04d29808d1..66dcdeb00da 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -484,7 +484,11 @@ extern size_t pure_size; | |||
| 484 | in a Lisp object whose data type says it points to something. */ | 484 | in a Lisp object whose data type says it points to something. */ |
| 485 | #define XPNTR(a) (XUINT (a) | DATA_SEG_BITS) | 485 | #define XPNTR(a) (XUINT (a) | DATA_SEG_BITS) |
| 486 | #else | 486 | #else |
| 487 | #define XPNTR(a) XUINT (a) | 487 | /* Some versions of gcc seem to consider the bitfield width when |
| 488 | issuing the "cast to pointer from integer of different size" | ||
| 489 | warning, so the cast is here to widen the value back to its natural | ||
| 490 | size. */ | ||
| 491 | #define XPNTR(a) ((EMACS_INT) XUINT (a)) | ||
| 488 | #endif | 492 | #endif |
| 489 | #endif /* not HAVE_SHM */ | 493 | #endif /* not HAVE_SHM */ |
| 490 | #endif /* no XPNTR */ | 494 | #endif /* no XPNTR */ |