changeset 41865:f5dbdfc9fe27

(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.
author Andreas Schwab <schwab@suse.de>
date Fri, 07 Dec 2001 12:15:21 +0000
parents 16dc446b245f
children 6cba361d7666
files src/data.c
diffstat 1 files changed, 7 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- 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