# HG changeset patch # User Andreas Schwab # Date 1007727321 0 # Node ID f5dbdfc9fe27cf2a174eb531595611542b45c74e # Parent 16dc446b245f47c801273459472641c555622579 (Vmost_positive_fixnum, Vmost_negative_fixnum): Renamed from most_positive_fixnum and most_negative_fixnum, resp., and type changed to Lisp_Object. (syms_of_data): DEFVAR_LISP them. diff -r 16dc446b245f -r f5dbdfc9fe27 src/data.c --- a/src/data.c Fri Dec 07 11:57:15 2001 +0000 +++ b/src/data.c Fri Dec 07 12:15:21 2001 +0000 @@ -96,7 +96,7 @@ static Lisp_Object swap_in_symval_forwarding P_ ((Lisp_Object, Lisp_Object)); -int most_positive_fixnum, most_negative_fixnum; +Lisp_Object Vmost_positive_fixnum, Vmost_negative_fixnum; void @@ -3208,13 +3208,13 @@ XSYMBOL (Qwholenump)->function = XSYMBOL (Qnatnump)->function; - DEFVAR_INT ("most-positive-fixnum", &most_positive_fixnum, - doc: /* The largest value that is representable in a Lisp integer. */); - most_positive_fixnum = MOST_POSITIVE_FIXNUM; + 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); - DEFVAR_INT ("most-negative-fixnum", &most_negative_fixnum, - doc: /* The smallest value that is representable in a Lisp integer. */); - most_negative_fixnum = MOST_NEGATIVE_FIXNUM; + 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); } SIGTYPE