From: Jeff Law <law@gcc.gnu.org>
Date: Tue, 4 Nov 1997 23:21:27 +0000 (-0700)
Subject: Move test from execute to compile.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=52be7f110c09407aab78a15d36f8f11e101699c5;p=gcc.git

Move test from execute to compile.

From-SVN: r16321
---

diff --git a/gcc/testsuite/g77.f-torture/compile/alpha1.f b/gcc/testsuite/g77.f-torture/compile/alpha1.f
new file mode 100644
index 00000000000..7cda74ebd45
--- /dev/null
+++ b/gcc/testsuite/g77.f-torture/compile/alpha1.f
@@ -0,0 +1,10 @@
+      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
diff --git a/gcc/testsuite/g77.f-torture/execute/alpha1.f b/gcc/testsuite/g77.f-torture/execute/alpha1.f
deleted file mode 100644
index 9fd464ecb4a..00000000000
--- a/gcc/testsuite/g77.f-torture/execute/alpha1.f
+++ /dev/null
@@ -1,11 +0,0 @@
-      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
-      I = 0
-      IF(I.NE.0) call exit(1)
-C gcc: Internal compiler error: program f771 got fatal signal 11
-C  at this point!
-      END