Bug Report

[Andrew Vaught <andy@xxxxxxxxxxxxxxxx>]

Hi--

  I ran across a problem with your fortran 90 compiler.  The program:

type tt
  integer :: unit
end type

type(tt) :: comm

write(comm%unit)
end

Crashes the compiler with:

andyv@medusa:~ % f90 -c tst.f90

### Assertion failure at line 402 of ../../../crayf90/sgi/cwh_stk.c:
### Compiler Error in file tst.f90 during IR->WHIRL Conversion phase:
### Stack underflow
f90 INTERNAL ERROR:  /usr/lib32/cmplrs/mfef90 returned non-zero status 1
andyv@medusa:~ %
----------------------------------
"uname -a" gives:

IRIX64 medusa 6.4 02121744 IP27

----------------------------------
"f90 -version" gives:
MIPSpro Compilers: Version 7.20

           Andy

-----------------                        XOLD(K,IC,I)=
Andy Vaught               ....        DO ITERS=1, 10  XOLD(K,IC,I)
andy@xxxxxxxxxxxxxxxx     |  |   /CALLMSOLVE(A,B,X,I,ITERS,TOL)+(RANNYU(0)
Arizona State University  ======|WRITE(6,'(I5,2X,F12.6)')ITERS,TOL -HALF)
Tempe, Arizona USA        OOOOOO \ENDDORETURN PARAMETER(ZERO=1.D0)*TENTH*DELTA