From: Glenn Morris Date: Thu, 10 Jun 2010 05:31:36 +0000 (-0700) Subject: * src/editfns.c (Fbyte_to_string): Pacify compiler. X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~81 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=64c60c2fed2036f938aafcb57e0689745b723ae3;p=emacs.git * src/editfns.c (Fbyte_to_string): Pacify compiler. --- diff --git a/src/ChangeLog b/src/ChangeLog index 8f43d0e8cb0..99ca9895c0e 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,7 @@ 2010-06-10 Glenn Morris + * editfns.c (Fbyte_to_string): Pacify compiler. + * m/ibms390x.h: Rather than duplicating ibms390.h, just include it. 2010-06-09 Stefan Monnier diff --git a/src/editfns.c b/src/editfns.c index caac2c5c199..ea279a462f2 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -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); }