gcc/testsuite/g77.f-torture/noncompile/980615-0.f


1
2
3
4
5
6
7
8
9
10

* Fixed by JCB 1998-07-25 change to stc.c.

* Date: Thu, 11 Jun 1998 22:35:20 -0500
* From: Ian A Watson <WATSON_IAN_A@lilly.com>
* Subject: crash
* 
      CaLL foo(W)
      END
      SUBROUTINE foo(W)
      yy(I)=A(I)Q(X)