http://gcc.gnu.org/bugzilla/show_bug.cgi?id=59662
janus at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Known to work| |4.8.1
Keywords| |rejects-valid
Last reconfirmed| |2014-01-03
CC| |janus at gcc dot gnu.org
Ever confirmed|0 |1
Summary|[OOP] TBP subroutine call |[4.9 Regression] [OOP] TBP
|rejected in contained |subroutine call rejected in
|subroutine |connection with BIND(C)
Known to fail| |4.9.0
--- Comment #1 from janus at gcc dot gnu.org ---
Confirmed. There is some strange interaction with BIND(C). Reduced test case:
module base_mod
implicit none
type outer
contains
procedure, nopass :: mv_to_base
end type
contains
subroutine mv_to_base
end subroutine
subroutine foobar
type(outer) :: a
integer :: info
interface
integer function try() bind(c)
end function
end interface
call a%mv_to_base()
info = try()
end subroutine
end module
