From b46af585faa9bd2d3564d087df1f6528a8d82104 Mon Sep 17 00:00:00 2001
From: Jeff Law <law@gcc.gnu.org>
Date: Sun, 2 Nov 1997 23:11:55 -0700
Subject: [PATCH] Initialize I.

From-SVN: r16294
---
 gcc/testsuite/g77.f-torture/execute/alpha1.f | 11 +----------
 1 file changed, 1 insertion(+), 10 deletions(-)

diff --git a/gcc/testsuite/g77.f-torture/execute/alpha1.f b/gcc/testsuite/g77.f-torture/execute/alpha1.f
index 7cda74ebd45f..550c328e7cd5 100644
--- 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
-- 
2.47.2