From: Paul Eggert <eggert@cs.ucla.edu>
Date: Sat, 18 Jun 2011 16:10:16 +0000 (-0700)
Subject: * fns.c (mapcar1): Declare byte as byte, for clarity.
X-Git-Tag: emacs-pretest-24.0.90~104^2~473^2~53
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=85461888af64b0a2edd1405714892a67c7a4b925;p=emacs.git

* fns.c (mapcar1): Declare byte as byte, for clarity.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 4ce871b7288..e2683795934 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -4,6 +4,7 @@
 	Use much-faster test for byte-length change.
 	Don't assume string byte-length fits in 'int'.
 	Check that character arg fits in 'int'.
+	(mapcar1): Declare byte as byte, for clarity.
 
 	* alloc.c (Fmake_bool_vector): Avoid unnecessary multiplication.
 
diff --git a/src/fns.c b/src/fns.c
index 32d96fbc94e..bbda385d927 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -2307,7 +2307,7 @@ mapcar1 (EMACS_INT leni, Lisp_Object *vals, Lisp_Object fn, Lisp_Object seq)
     {
       for (i = 0; i < leni; i++)
 	{
-	  int byte;
+	  unsigned char byte;
 	  byte = XBOOL_VECTOR (seq)->data[i / BOOL_VECTOR_BITS_PER_CHAR];
 	  dummy = (byte & (1 << (i % BOOL_VECTOR_BITS_PER_CHAR))) ? Qt : Qnil;
 	  dummy = call1 (fn, dummy);