changeset 11142:41b869bbe0e1

(Fconcat): Undo previous change.
author Richard M. Stallman <rms@gnu.org>
date Tue, 28 Mar 1995 07:38:29 +0000
parents 6f6c571ad0c0
children a9a40def9903
files src/fns.c
diffstat 1 files changed, 7 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/fns.c	Tue Mar 28 05:44:53 1995 +0000
+++ b/src/fns.c	Tue Mar 28 07:38:29 1995 +0000
@@ -222,8 +222,12 @@
 DEFUN ("concat", Fconcat, Sconcat, 0, MANY, 0,
   "Concatenate all the arguments and make the result a string.\n\
 The result is a string whose elements are the elements of all the arguments.\n\
-Each argument may be a string, a character (integer), or a list or vector\n\
-of characters (integers).")
+Each argument may be a string or a list or vector of characters (integers).\n\
+\n\
+Do not use individual integers as arguments!\n\
+The behavior of `concat' in that case will be changed later!\n\
+If your program passes an integer as an argument to `concat',\n\
+you should change it right away not to do so.")
   (nargs, args)
      int nargs;
      Lisp_Object *args;
@@ -288,7 +292,7 @@
 	    || COMPILEDP (this)))
 	{
 	  if (INTEGERP (this))
-	    args[argnum] = Fcons (this, Qnil);
+            args[argnum] = Fnumber_to_string (this);
 	  else
 	    args[argnum] = wrong_type_argument (Qsequencep, this);
 	}