Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/gfortran.dg/class_26.f03 @ 145:1830386684a0
gcc-9.2.0
author | anatofuz |
---|---|
date | Thu, 13 Feb 2020 11:34:05 +0900 |
parents | 04ced10e8804 |
children |
line wrap: on
line source
! { dg-do run } ! ! PR 44065: [OOP] Undefined reference to vtab$... ! ! Contributed by Salvatore Filippone <sfilippone@uniroma2.it> module s_mat_mod implicit none type :: s_sparse_mat end type contains subroutine s_set_triangle(a) class(s_sparse_mat), intent(inout) :: a end subroutine end module module s_tester implicit none contains subroutine s_ussv_2 use s_mat_mod type(s_sparse_mat) :: a call s_set_triangle(a) end subroutine end module end