This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/55057] [OOP] wrong result with abstract type
- 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: Thu, 25 Oct 2012 14:51:44 +0000
- Subject: [Bug fortran/55057] [OOP] wrong result with abstract type
- Auto-submitted: auto-generated
- References: <bug-55057-4@http.gcc.gnu.org/bugzilla/>
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=55057
--- Comment #3 from janus at gcc dot gnu.org 2012-10-25 14:51:44 UTC ---
Here is a reduced test case, which is not usable as a runtime test, but shows
the wrong dump:
module m
implicit none
type :: t1
end type
type :: t2
class(t1), allocatable :: work(:)
end type
contains
subroutine alt(x)
class(t1), intent(in) :: x
end subroutine
subroutine sub1(a)
type(t2) :: a
call alt(a%work(1))
end subroutine
subroutine sub2(b)
class(t2) :: b
call alt(b%work(1))
end subroutine
end module
The dump of 'sub2' is wrong in 4.8, while 'sub1' is ok. With 4.7, both are
wrong.