diff options
Diffstat (limited to 'gcc/testsuite/g77.f-torture/compile/990115-1.f')
| -rw-r--r-- | gcc/testsuite/g77.f-torture/compile/990115-1.f | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/gcc/testsuite/g77.f-torture/compile/990115-1.f b/gcc/testsuite/g77.f-torture/compile/990115-1.f deleted file mode 100644 index 187e1b463b5..00000000000 --- a/gcc/testsuite/g77.f-torture/compile/990115-1.f +++ /dev/null @@ -1,8 +0,0 @@ -C Derived from lapack - SUBROUTINE ZGELSX( M, N, NRHS, A, LDA, B, LDB, JPVT, RCOND, RANK, - $ WORK, RWORK, INFO ) - COMPLEX*16 WORK( * ) - DO 20 I = 1, RANK - WORK( ISMAX+I-1 ) = S2*WORK( ISMAX+I-1 ) - 20 CONTINUE - END |