16 lines
354 B
Fortran
16 lines
354 B
Fortran
|
! { dg-do compile }
|
||
|
!
|
||
|
! Test the fix for PR41583, in which the different source files
|
||
|
! would generate the same 'vindex' for different class declared
|
||
|
! types.
|
||
|
!
|
||
|
! The test comprises class_4a, class_4b class_4c and class_4d.f03
|
||
|
!
|
||
|
! Contributed by Tobias Burnus <burnus@gcc.gnu.org>
|
||
|
!
|
||
|
module m2
|
||
|
use m
|
||
|
type, extends(t) :: t2
|
||
|
end type t2
|
||
|
end module m2
|