diff options
author | Jim Blandy <jimb@redhat.com> | 1993-03-30 21:21:49 +0000 |
---|---|---|
committer | Jim Blandy <jimb@redhat.com> | 1993-03-30 21:21:49 +0000 |
commit | b89f5a68e57172832913902651f5259e5392e83e (patch) | |
tree | 04ba86e8321844341fe3934ac243162a72c3ae5d /src/data.c | |
parent | 35067a1bee16f01a394d443dd92e5fd4eb342433 (diff) | |
download | emacs-b89f5a68e57172832913902651f5259e5392e83e.tar.gz |
Rename int-to-string to number-to-string, since it can handle
floating-point as well as integer arguments. subr.el defines the
former as an alias for the latter.
* data.c (Fnumber_to_string): Renamed from Fint_to_string.
(wrong_type_argument): Adjust caller.
(syms_of_data): Adjust defsubr.
* fns.c (concat): Adjust caller.
* lisp.h (Fnumber_to_string): Adjust extern declaration.
* mocklisp.c (Finsert_string): Adjust caller.
* process.c (status_message): Adjust caller.
Diffstat (limited to 'src/data.c')
-rw-r--r-- | src/data.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/data.c b/src/data.c index fe71c6768cb..4b2fa3cebbf 100644 --- a/src/data.c +++ b/src/data.c @@ -72,7 +72,7 @@ wrong_type_argument (predicate, value) (EQ (predicate, Qintegerp) || EQ (predicate, Qinteger_or_marker_p))) return Fstring_to_number (value); if (XTYPE (value) == Lisp_Int && EQ (predicate, Qstringp)) - return Fint_to_string (value); + return Fnumber_to_string (value); } value = Fsignal (Qwrong_type_argument, Fcons (predicate, Fcons (value, Qnil))); tem = call1 (predicate, value); @@ -1425,7 +1425,7 @@ DEFUN ("zerop", Fzerop, Szerop, 1, 1, 0, "T if NUMBER is zero.") return Qnil; } -DEFUN ("int-to-string", Fint_to_string, Sint_to_string, 1, 1, 0, +DEFUN ("number-to-string", Fnumber_to_string, Snumber_to_string, 1, 1, 0, "Convert NUM to a string by printing it in decimal.\n\ Uses a minus sign if negative.\n\ NUM may be an integer or a floating point number.") @@ -2121,7 +2121,7 @@ syms_of_data () defsubr (&Skill_local_variable); defsubr (&Saref); defsubr (&Saset); - defsubr (&Sint_to_string); + defsubr (&Snumber_to_string); defsubr (&Sstring_to_number); defsubr (&Seqlsign); defsubr (&Slss); |