diff options
| author | Andreas Schwab | 2001-12-07 12:15:35 +0000 |
|---|---|---|
| committer | Andreas Schwab | 2001-12-07 12:15:35 +0000 |
| commit | 9d113d9d5846e0a0c34af85f22b8a9cf8ac7c78f (patch) | |
| tree | 61e7d21e4ea910e664303cf85a67f9e06daacfdb /src/data.c | |
| parent | b5f1c9fa029b1d377165eb31618c52c4c0a77164 (diff) | |
| download | emacs-9d113d9d5846e0a0c34af85f22b8a9cf8ac7c78f.tar.gz emacs-9d113d9d5846e0a0c34af85f22b8a9cf8ac7c78f.zip | |
(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.
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/src/data.c b/src/data.c index 266a1946fa0..f47167af292 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -96,7 +96,7 @@ static Lisp_Object Qsubrp, Qmany, Qunevalled; | |||
| 96 | 96 | ||
| 97 | static Lisp_Object swap_in_symval_forwarding P_ ((Lisp_Object, Lisp_Object)); | 97 | static Lisp_Object swap_in_symval_forwarding P_ ((Lisp_Object, Lisp_Object)); |
| 98 | 98 | ||
| 99 | int most_positive_fixnum, most_negative_fixnum; | 99 | Lisp_Object Vmost_positive_fixnum, Vmost_negative_fixnum; |
| 100 | 100 | ||
| 101 | 101 | ||
| 102 | void | 102 | void |
| @@ -3208,13 +3208,13 @@ syms_of_data () | |||
| 3208 | 3208 | ||
| 3209 | XSYMBOL (Qwholenump)->function = XSYMBOL (Qnatnump)->function; | 3209 | XSYMBOL (Qwholenump)->function = XSYMBOL (Qnatnump)->function; |
| 3210 | 3210 | ||
| 3211 | DEFVAR_INT ("most-positive-fixnum", &most_positive_fixnum, | 3211 | DEFVAR_LISP ("most-positive-fixnum", &Vmost_positive_fixnum, |
| 3212 | doc: /* The largest value that is representable in a Lisp integer. */); | 3212 | doc: /* The largest value that is representable in a Lisp integer. */); |
| 3213 | most_positive_fixnum = MOST_POSITIVE_FIXNUM; | 3213 | Vmost_positive_fixnum = make_number (MOST_POSITIVE_FIXNUM); |
| 3214 | 3214 | ||
| 3215 | DEFVAR_INT ("most-negative-fixnum", &most_negative_fixnum, | 3215 | DEFVAR_LISP ("most-negative-fixnum", &Vmost_negative_fixnum, |
| 3216 | doc: /* The smallest value that is representable in a Lisp integer. */); | 3216 | doc: /* The smallest value that is representable in a Lisp integer. */); |
| 3217 | most_negative_fixnum = MOST_NEGATIVE_FIXNUM; | 3217 | Vmost_negative_fixnum = make_number (MOST_NEGATIVE_FIXNUM); |
| 3218 | } | 3218 | } |
| 3219 | 3219 | ||
| 3220 | SIGTYPE | 3220 | SIGTYPE |