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