* doc.c (get_doc_string): Omit (unsigned)c that mishandled negatives.

2 files changed, 7 insertions, 2 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 9b0ff3e7339..9196367d195 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,7 @@
 2011-06-13  Paul Eggert  <eggert@cs.ucla.edu>
 
+        * doc.c (get_doc_string): Omit (unsigned)c that mishandled negatives.
+
         * data.c (Faset): If ARRAY is a string, check that NEWELT is a char.
         Without this fix, on a 64-bit host (aset S 0 4294967386) would
         incorrectly succeed when S was a string, because 4294967386 was
diff --git a/src/doc.c b/src/doc.c
index 89a7d322966..48e0936510b 100644
--- a/src/doc.c
+++ b/src/doc.c
@@ -253,9 +253,12 @@ get_doc_string (Lisp_Object filepos, int unibyte, int definition)
           else if (c == '_')
             *to++ = 037;
           else
-            error ("\
+            {
+              unsigned char uc = c;
+              error ("\
 Invalid data in documentation file -- %c followed by code %03o",
-                   1, (unsigned)c);
+                     1, uc);
+            }
         }
       else
         *to++ = *from++;