andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(FIXNUM_OVERFLOW_P): Remove cast to avoid overflow.

Browse source
This commit is contained in:
Andreas Schwab 2009-10-23 20:56:30 +00:00
parent 6798b799df
commit 7b792fc98d
2 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/ChangeLog
View file

@ -1,5 +1,7 @@
2009-10-23 Andreas Schwab <schwab@linux-m68k.org>
* lisp.h (FIXNUM_OVERFLOW_P): Remove cast to avoid overflow.
* puresize.h (PURESIZE_RATIO): Decrease to 11/7.
2009-10-23 Chong Yidong <cyd@stupidchicken.com>

6
src/lisp.h
View file

@ -486,11 +486,11 @@ extern size_t pure_size;
I.e. (x & INTMASK) == XUINT (make_number (x)). */
#define INTMASK ((((EMACS_INT) 1) << VALBITS) - 1)
/* Value is non-zero if C integer I doesn't fit into a Lisp fixnum. */
/* Value is non-zero if I doesn't fit into a Lisp fixnum. */
#define FIXNUM_OVERFLOW_P(i) \
((EMACS_INT)(i) > MOST_POSITIVE_FIXNUM \
|| (EMACS_INT) (i) < MOST_NEGATIVE_FIXNUM)
((i) > MOST_POSITIVE_FIXNUM \
|| (i) < MOST_NEGATIVE_FIXNUM)
/* Extract a value or address from a Lisp_Object. */