! { dg-lto-do link } | |
! { dg-lto-options { { -flto -g0 } } } | |
! { dg-extra-ld-options { -g } } | |
program nml_test | |
implicit none | |
type t | |
integer :: c1 | |
integer :: c2(3) | |
end type t | |
call test2(2) | |
contains | |
subroutine test2(n) | |
integer :: n | |
type(t) :: x12(n) | |
namelist /nml2/ x12 | |
end subroutine test2 | |
end program nml_test |