------- Comment #6 from janus at gcc dot gnu dot org 2010-05-17 21:02 ------- Another slight variation:
module module_myclass implicit none type :: inner contains procedure :: set end type type :: myclass type(inner) :: slice end type contains subroutine set(this) class(inner) :: this end subroutine end module module module_mysubclass use module_myclass, only : myclass implicit none contains subroutine init() type(myclass) :: this call this%slice%set() ! XXX PROBLEM HERE end subroutine end module program test end For this I get: /tmp/ccsEnCku.o: In function `__module_mysubclass_MOD_init': c5.f90:(.text+0x15): undefined reference to `vtab$inner.1570' c5.f90:(.text+0x21): undefined reference to `vtab$inner.1570' c5.f90:(.text+0x2a): undefined reference to `vtab$inner.1570' I have no clue about the origin of this PR's failures yet, though I suspect they're somehow related to the "use, only" clause. Removing the "only" kills the errors. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44064