From c397dc7a0d67ddd6aabb054e31c18f8765e7405f Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 26 Mar 2008 18:14:02 +0000 Subject: [PATCH] (syms_of_data): Mark most-positive-fixnum and most-negative-fixnum as constants. --- src/ChangeLog | 3 +++ src/data.c | 2 ++ 2 files changed, 5 insertions(+) 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 + * 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 -- 2.11.4.GIT