diff options
| author | Craig Burley <craig@jcb-sc.com> | 1999-08-26 15:24:57 +0000 |
|---|---|---|
| committer | Craig Burley <burley@gcc.gnu.org> | 1999-08-26 11:24:57 -0400 |
| commit | 03565372b3fcffd292ef7de1ef9f76f4ab727324 (patch) | |
| tree | 4e042a78b0d82d9bd0944926548225b452946611 | |
| parent | 368f4cd6f3270385da2a3f2b845039e83d3740cd (diff) | |
| download | gcc-03565372b3fcffd292ef7de1ef9f76f4ab727324.zip gcc-03565372b3fcffd292ef7de1ef9f76f4ab727324.tar.gz gcc-03565372b3fcffd292ef7de1ef9f76f4ab727324.tar.bz2 | |
New test
From-SVN: r28892
| -rw-r--r-- | gcc/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/testsuite/g77.f-torture/noncompile/970626-2.f | 4 |
2 files changed, 8 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 6ef6a64..5783a4c 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +1999-08-26 Craig Burley <craig@jcb-sc.com> + + * g77.f-torture/noncompile/970626-2.f: New test. + 1999-08-25 Paul Burchard <burchard@pobox.com> * g++.old-deja/g++.pt/lss-001.C, lss-002.C, lss-003.C, lss-004.C, diff --git a/gcc/testsuite/g77.f-torture/noncompile/970626-2.f b/gcc/testsuite/g77.f-torture/noncompile/970626-2.f new file mode 100644 index 0000000..c1e2348 --- /dev/null +++ b/gcc/testsuite/g77.f-torture/noncompile/970626-2.f @@ -0,0 +1,4 @@ + SUBROUTINE A(A,ALPHA,IA) + COMPLEX A(IA,*), ALPHA(*) + ALPHA(I)=A(I,I).ZERO) + END |