diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2011-06-18 12:13:46 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2011-06-18 12:13:46 -0700 |
| commit | 9a8e8d9b22be9652ed2f2e8acc02e1139b34d9dd (patch) | |
| tree | d5fc4d3bd2f8c081a6ab83e91108b1d1253c0368 /src/lisp.h | |
| parent | b61cc01c06234b0f48b5485d7d592c1c81c05c70 (diff) | |
| download | emacs-9a8e8d9b22be9652ed2f2e8acc02e1139b34d9dd.tar.gz emacs-9a8e8d9b22be9652ed2f2e8acc02e1139b34d9dd.tar.bz2 emacs-9a8e8d9b22be9652ed2f2e8acc02e1139b34d9dd.zip | |
* lisp.h (XSET) [USE_LISP_UNION_TYPE]: Use uintptr_t and intptr_t,
not EMACS_UINT and EMACS_INT, when converting pointer to integer.
This avoids a GCC warning when WIDE_EMACS_INT.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/lisp.h b/src/lisp.h index 108712a7894..2dcf73b7506 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -494,8 +494,8 @@ enum pvec_type #ifdef USE_LSB_TAG # define XSET(var, vartype, ptr) \ - (eassert ((((EMACS_UINT) (ptr)) & ((1 << GCTYPEBITS) - 1)) == 0), \ - (var).u.val = ((EMACS_UINT) (ptr)) >> GCTYPEBITS, \ + (eassert ((((uintptr_t) (ptr)) & ((1 << GCTYPEBITS) - 1)) == 0), \ + (var).u.val = ((uintptr_t) (ptr)) >> GCTYPEBITS, \ (var).u.type = ((char) (vartype))) /* Some versions of gcc seem to consider the bitfield width when issuing @@ -512,7 +512,7 @@ enum pvec_type # define XSETFASTINT(a, b) ((a).i = (b)) # define XSET(var, vartype, ptr) \ - (((var).s.val = ((EMACS_INT) (ptr))), ((var).s.type = ((char) (vartype)))) + (((var).s.val = ((intptr_t) (ptr))), ((var).s.type = ((char) (vartype)))) #ifdef DATA_SEG_BITS /* DATA_SEG_BITS forces extra bits to be or'd in with any pointers |