Imported gcc-4.4.3

[msp430-gcc.git] / gcc / testsuite / g77.f-torture / compile / 20000511-1.f

diff --git a/gcc/testsuite/g77.f-torture/compile/20000511-1.f b/gcc/testsuite/g77.f-torture/compile/20000511-1.f
deleted file mode 100644 (file)
index ff95214..0000000
--- a/gcc/testsuite/g77.f-torture/compile/20000511-1.f
+++ /dev/null
@@ -1,21 +0,0 @@
-      subroutine saxpy(n,sa,sx,incx,sy,incy)
-C
-C     constant times a vector plus a vector.
-C     uses unrolled loop for increments equal to one.
-C     jack dongarra, linpack, 3/11/78.
-C     modified 12/3/93, array(1) declarations changed to array(*)
-C
-      real sx(*),sy(*),sa
-      integer i,incx,incy,ix,iy,m,mp1,n
-C
-C  -ffast-math ICE provoked by this conditional
-      if(sa /= 0.0)then
-C
-C        code for both increments equal to 1
-C
-             do i= 1,n
-               sy(i)= sy(i)+sa*sx(i)
-               enddo
-       endif
-      return
-      end