[Bug fortran/19479] UBOUND causes ICE

[craig dot powers at gmail dot com]

------- Additional Comments From craig dot powers at gmail dot com  2005-02-08 21:53 -------
Further testing indicates that the bug is caused by an array in a derived type
-- the pointer is not necessary.

program test
  implicit none

  type test_type
    integer, dimension(5) :: a
  end type test_type

  type (test_type) :: tt
  integer i

  i = ubound(tt%a)
end program test


In this case, as originally takes on a non-null value (I presume because the
type member is now an array rather than a pointer), but in the component walk,
it is set to NULL via ref->u.c.sym->as.  I think this may be instructive about
the precise nature of the bug as originally reported.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19479