This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/49213] [OOP] gfortran rejects structure constructor expression
- From: "janus at gcc dot gnu.org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: Mon, 05 Aug 2013 09:08:41 +0000
- Subject: [Bug fortran/49213] [OOP] gfortran rejects structure constructor expression
- Auto-submitted: auto-generated
- References: <bug-49213-4 at http dot gcc dot gnu dot org/bugzilla/>
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=49213
--- Comment #12 from janus at gcc dot gnu.org ---
Related test case (using unlimited polymorphism) from
http://gcc.gnu.org/ml/fortran/2013-08/msg00011.html:
type t
class(*), pointer :: x
end type t
type(t), target :: y
integer,target :: z
type(t) :: x = t(y)
type(t) :: x = t(z)
class(*), pointer :: a => y
end
Unpatched gfortran trunk yields:
tobias2.f90:7.17:
type(t) :: x = t(y)
1
Error: Can't convert TYPE(t) to CLASS(*) at (1)
tobias2.f90:8.17:
type(t) :: x = t(z)
1
Error: Can't convert INTEGER(4) to CLASS(*) at (1)