diff options
| -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 |