Backport from trunk: * src/editfns.c (Fbyte_to_string): Pacify compiler.

This commit is contained in:
Glenn Morris 2010-06-14 23:16:19 -07:00
parent 12755d0846
commit 6fda6a0c40
2 changed files with 10 additions and 4 deletions

View file

@ -1,3 +1,7 @@
2010-06-15 Glenn Morris <rgm@gnu.org>
* editfns.c (Fbyte_to_string): Pacify compiler.
2010-06-09 Stefan Monnier <monnier@iro.umontreal.ca>
* dbusbind.c (xd_append_arg): Don't "make-unibyte" the string.

View file

@ -1,7 +1,8 @@
/* Lisp functions pertaining to editing.
Copyright (C) 1985, 1986, 1987, 1989, 1993, 1994, 1995, 1996,
1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
Copyright (C) 1985, 1986, 1987, 1989, 1993, 1994, 1995, 1996, 1997,
1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008,
2009, 2010 Free Software Foundation, Inc.
This file is part of GNU Emacs.
@ -225,8 +226,9 @@ DEFUN ("byte-to-string", Fbyte_to_string, Sbyte_to_string, 1, 1, 0,
(byte)
Lisp_Object byte;
{
unsigned char b;
CHECK_NUMBER (byte);
unsigned char b = XINT (byte);
b = XINT (byte);
return make_string_from_bytes (&b, 1, 1);
}