Commit 7b792fc9 authored by Andreas Schwab's avatar Andreas Schwab
Browse files

(FIXNUM_OVERFLOW_P): Remove cast to avoid overflow.

parent 6798b799
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>
......
......@@ -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. */
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment