[Bug fortran/44064] [OOP] ICE with file containing two modules and one program

[janus at gcc dot gnu dot org]

------- 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