This is the mail archive of the
gcc@gcc.gnu.org
mailing list for the GCC project.
g77.f-torture/execute/alpha1.f is strange
- To: egcs at cygnus dot com
- Subject: g77.f-torture/execute/alpha1.f is strange
- From: hjl at lucon dot org (H.J. Lu)
- Date: Sat, 1 Nov 1997 19:02:37 -0800 (PST)
Here is g77.f-torture/execute/alpha1.f. It may call exit (1) if I
doesn't happen to be 0. I don't remember what Fortran should be in
this case. I think I is default to INTEGER. But I don't know if
it should be initialized to 0. From the x86 asm code, gcc doesn't
initialize it at all. In any case, I got the exit value 1 on
linux/x86/glibc 2 and linux/alpha/glibc 2.0.5c.
--
H.J. Lu (hjl@gnu.ai.mit.edu)
---g77.f-torture/execute/alpha1.f---
REAL*8 A,B,C
REAL*4 RARRAY(19)/19*(-1)/
INTEGER BOTTOM,RIGHT
INTEGER IARRAY(19)/0,0,0,0,0,0,0,0,0,0,0,0,13,14,0,0,0,0,0/
EQUIVALENCE (RARRAY(13),BOTTOM),(RARRAY(14),RIGHT)
C
IF(I.NE.0) call exit(1)
C gcc: Internal compiler error: program f771 got fatal signal 11
C at this point!
END