mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-06 14:02:07 -08:00
Code Issues Projects Releases Wiki Activity

(syms_of_data): Mark most-positive-fixnum and

Browse source 
most-negative-fixnum as constants.
This commit is contained in:
Stefan Monnier 2008-03-26 18:14:02 +00:00
parent bf6b4d583b
commit c397dc7a0d
2 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/ChangeLog
View file

@ -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.

2
src/data.c
View file

@ -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