diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-03-26 18:14:02 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-03-26 18:14:02 +0000 |
commit | de5d41c2f8bc27ae96eb754d0ff60dfae070f2ee (patch) | |
tree | f7c854b7af5cb2b9dc4da14850b8b56c21cac5e2 | |
parent | 948569298b6a4fe63e76b05da1ccade9cec101f4 (diff) | |
download | emacs-de5d41c2f8bc27ae96eb754d0ff60dfae070f2ee.tar.gz |
(syms_of_data): Mark most-positive-fixnum and
most-negative-fixnum as constants.
-rw-r--r-- | src/ChangeLog | 3 | ||||
-rw-r--r-- | src/data.c | 2 |
2 files changed, 5 insertions, 0 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index a246449bfb7..52aeaf130a1 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,8 @@ 2008-03-26 Stefan Monnier <monnier@iro.umontreal.ca> + * data.c (syms_of_data): Mark most-positive-fixnum and + most-negative-fixnum as constants. + * xdisp.c (redisplay_internal): Reset selected_frame earlier. * indent.c (scan_for_column): Extract from current_column_1. diff --git a/src/data.c b/src/data.c index 6f1256786ec..6b1a9fc8860 100644 --- a/src/data.c +++ b/src/data.c @@ -3231,10 +3231,12 @@ syms_of_data () DEFVAR_LISP ("most-positive-fixnum", &Vmost_positive_fixnum, doc: /* The largest value that is representable in a Lisp integer. */); Vmost_positive_fixnum = make_number (MOST_POSITIVE_FIXNUM); + XSYMBOL (intern ("most-positive-fixnum"))->constant = 1; DEFVAR_LISP ("most-negative-fixnum", &Vmost_negative_fixnum, doc: /* The smallest value that is representable in a Lisp integer. */); Vmost_negative_fixnum = make_number (MOST_NEGATIVE_FIXNUM); + XSYMBOL (intern ("most-negative-fixnum"))->constant = 1; } SIGTYPE |