Imported gcc-4.4.3

[msp430-gcc.git] / gcc / testsuite / g77.f-torture / execute / claus.f

diff --git a/gcc/testsuite/g77.f-torture/execute/claus.f b/gcc/testsuite/g77.f-torture/execute/claus.f
deleted file mode 100644 (file)
index bccef7f..0000000
--- a/gcc/testsuite/g77.f-torture/execute/claus.f
+++ /dev/null
@@ -1,13 +0,0 @@
-        PROGRAM TEST
-        REAL AB(3)
-        do i=1,3
-         AB(i)=i
-        enddo
-        k=1
-        n=2
-        ind=k-n+2
-       if (ind /= 1) call abort
-       if (ab(ind) /= 1) call abort
-       if (k-n+2 /= 1) call abort
-       if (ab(k-n+2) /= 1) call abort
-        END