(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 --git a/src/ChangeLog b/src/ChangeLog
index 23e7753092a3a6753ce01fa43880e1d1cedbf5e7..966ce1209f2e37b6d00e1e015df05c631643422c 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,10 @@
+2001-12-07  Andreas Schwab  <schwab@suse.de>
+
+       * data.c (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.
+
 2001-12-07  Richard M. Stallman  <rms@gnu.org>
 
        * callproc.c (init_callproc): Set Vdata_directory based on the source

diff --git a/src/data.c b/src/data.c
index 266a1946fa057c7b61cbd93eb366d0ec75738b71..f47167af2920d13f8f1fe59b14aeecb28d680e25 100644 (file)
--- a/src/data.c
+++ b/src/data.c
@@ -96,7 +96,7 @@ static Lisp_Object Qsubrp, Qmany, Qunevalled;
 
 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 @@ syms_of_data ()
 
   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