Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
7b792fc9
Commit
7b792fc9
authored
Oct 23, 2009
by
Andreas Schwab
Browse files
(FIXNUM_OVERFLOW_P): Remove cast to avoid overflow.
parent
6798b799
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
5 additions
and
3 deletions
+5
-3
src/ChangeLog
src/ChangeLog
+2
-0
src/lisp.h
src/lisp.h
+3
-3
No files found.
src/ChangeLog
View file @
7b792fc9
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>
...
...
src/lisp.h
View file @
7b792fc9
...
...
@@ -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. */
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment