* p-lang.c (pascal_one_char): Do not restrict C to 0..255 range.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index b424c7d..c6465a0 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,9 @@
 2010-04-16  Pierre Muller  <muller@ics.u-strasbg.fr>
 
+       * p-lang.c (pascal_one_char): Do not restrict C to 0..255 range.
+
+2010-04-16  Pierre Muller  <muller@ics.u-strasbg.fr>
+
        Support for Windows OS Thread Information Block.
        * NEWS: Document new feature.
        * remote.c (PACKET_qGetTIBAddr): New enum element.

diff --git a/gdb/p-lang.c b/gdb/p-lang.c
index 415cd99..44aefa4 100644 (file)
--- a/gdb/p-lang.c
+++ b/gdb/p-lang.c
@@ -158,9 +158,7 @@ static void
 pascal_one_char (int c, struct ui_file *stream, int *in_quotes)
 {
 
-  c &= 0xFF;                   /* Avoid sign bit follies */
-
-  if ((c == '\'') || (PRINT_LITERAL_FORM (c)))
+  if (c == '\'' || ((unsigned int) c <= 0xff && (PRINT_LITERAL_FORM (c))))
     {
       if (!(*in_quotes))
        fputs_filtered ("'", stream);