2002-04-11 Toon Moene <toon@moene.indiv.nluug.nl>

	* libI77/lio.h: Treat INTEGER*1 as signed char.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@52172 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/libf2c/ChangeLog b/libf2c/ChangeLog
index b636620..aee3d69 100644 (file)
--- a/libf2c/ChangeLog
+++ b/libf2c/ChangeLog
@@ -1,3 +1,7 @@
+2002-04-11  Toon Moene  <toon@moene.indiv.nluug.nl>
+
+       * libI77/lio.h: Treat INTEGER*1 as signed char.
+
 2002-03-06  Phil Edwards  <pme@gcc.gnu.org>
 
        * libF77/Version.c:  Fix misplaced leading blanks on first line.

diff --git a/libf2c/libI77/lio.h b/libf2c/libI77/lio.h
index 0123172..ec0c23d 100644 (file)
--- a/libf2c/libI77/lio.h
+++ b/libf2c/libI77/lio.h
@@ -43,7 +43,10 @@
 
 typedef union
 {
-       char    flchar;
+#ifndef KR_headers
+       signed
+#endif
+               char    flchar;
        short   flshort;
        ftnint  flint;
 #ifdef Allow_TYQUAD