From 603a8d59d24dbfab9c3a1fc9e819cc62aaf86d6f Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Fri, 9 Feb 2001 05:32:46 +0000 Subject: [PATCH] (Fchar_to_string): If CHARACTER is less than 256, return a unibyte string. --- src/editfns.c | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/editfns.c b/src/editfns.c index bf65c0a86d5..2f5e3f711ea 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -167,7 +167,9 @@ DEFUN ("char-to-string", Fchar_to_string, Schar_to_string, 1, 1, 0, CHECK_NUMBER (character, 0); - len = CHAR_STRING (XFASTINT (character), str); + len = (SINGLE_BYTE_CHAR_P (XFASTINT (character)) + ? (*str = (unsigned char)(XFASTINT (character)), 1) + : char_to_string (XFASTINT (character), str)); return make_string_from_bytes (str, 1, len); } -- 2.39.5