+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.
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);