Initialize I.

From-SVN: r16294

diff --git a/gcc/testsuite/g77.f-torture/execute/alpha1.f b/gcc/testsuite/g77.f-torture/execute/alpha1.f
index 7cda74ebd45f0f1bbdff9a3157d231f4497a1f21..550c328e7cd55bd9174b20d55588ac9f984d566e 100644 (file)
--- a/gcc/testsuite/g77.f-torture/execute/alpha1.f
+++ b/gcc/testsuite/g77.f-torture/execute/alpha1.f
@@ -1,10 +1 @@
-      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
+      I = 0