1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
! { dg-do compile } ! { dg-options "-std=f95" } ! ! PR fortran/53111 ! ! Contributed by Jacob Middag, reduced by Janus Weil. ! module a type :: my real :: x end type end module module b use a end module program test use a use b end program