This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug libf2c/15151] -m64 flag causes incorrect logical i/o (g77)
- From: "ebotcazou at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 2 May 2004 07:49:29 -0000
- Subject: [Bug libf2c/15151] -m64 flag causes incorrect logical i/o (g77)
- References: <20040426153157.15151.eesrjhc@bath.ac.uk>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Additional Comments From ebotcazou at gcc dot gnu dot org 2004-05-02 07:49 -------
> i do not have access to a SPARC system to debug this, but this may (or may
> not:) help someone else looking at this.
I tried your patch but it doesn't seem to help. I also tried:
Index: wrtfmt.c
===================================================================
RCS file: /cvs/gcc/gcc/libf2c/libI77/wrtfmt.c,v
retrieving revision 1.7
diff -u -r1.7 wrtfmt.c
--- wrtfmt.c 2 Jun 2002 13:01:12 -0000 1.7
+++ wrtfmt.c 2 May 2004 07:42:27 -0000
@@ -251,11 +251,15 @@
wrt_L (Uint * n, int len, ftnlen sz)
{
int i;
- long x;
+ longint x;
if (sizeof (long) == sz)
x = n->il;
else if (sz == sizeof (char))
x = n->ic;
+#ifdef Allow_TYQUAD
+ else if (sz == sizeof (longint))
+ x = n->ili;
+#endif
else
x = n->is;
for (i = 0; i < len - 1; i++)
with the same result.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=15151