------- Comment #4 from fxcoudert at gcc dot gnu dot org 2007-11-20 13:03
-------
The Intel and Sun compilers complain that this code is not legal, because you
can't do "x = mytype(yy, bar)" if yy is not allocated.
Otherwise, a reduced testcase on x86_64-linux is:
type t
integer, allocatable :: a(:)
end type t
type(t) :: x
integer(kind=8), allocatable :: yy(:)
x = t(yy)
if (allocated(x%a)) print *, "bug"
end
--
fxcoudert at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |fxcoudert at gcc dot gnu dot
| |org
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Last reconfirmed|0000-00-00 00:00:00 |2007-11-20 13:03:36
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34143
