]> oss.titaniummirror.com Git - msp430-gcc.git/blobdiff - gcc/testsuite/g77.f-torture/compile/20000518.f
Imported gcc-4.4.3
[msp430-gcc.git] / gcc / testsuite / g77.f-torture / compile / 20000518.f
diff --git a/gcc/testsuite/g77.f-torture/compile/20000518.f b/gcc/testsuite/g77.f-torture/compile/20000518.f
deleted file mode 100644 (file)
index 200a1eb..0000000
+++ /dev/null
@@ -1,16 +0,0 @@
-      SUBROUTINE SORG2R( K, A, N, LDA )
-*  ICE in `verify_wide_reg_1', at flow.c:2605 at -O2
-*  g77 version 2.96 20000515 (experimental) on i686-pc-linux-gnu
-*
-*  Originally derived from LAPACK 3.0 test suite failure.
-*
-*  David Billinghurst, (David.Billinghurst@riotinto.com.au)
-*  18 May 2000
-      INTEGER            I, K, LDA, N
-      REAL               A( LDA, * )
-      DO I = K, 1, -1
-         IF( I.LT.N ) A( I, I ) = 1.0
-         A( I, I ) = 1.0
-      END DO
-      RETURN
-      END