From-SVN: r28892
This commit is contained in:
Craig Burley 1999-08-26 15:24:57 +00:00 committed by Craig Burley
parent 368f4cd6f3
commit 03565372b3
2 changed files with 8 additions and 0 deletions

View File

@ -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,

View File

@ -0,0 +1,4 @@
SUBROUTINE A(A,ALPHA,IA)
COMPLEX A(IA,*), ALPHA(*)
ALPHA(I)=A(I,I).ZERO)
END