blob: 672e3f61d6edc5e54b481e145d66abdf19786900 [file] [log] [blame]
! { dg-do compile }
! PR78659 Spurious "requires DTIO" reported against namelist statement
program p
type t
integer :: k
end type
class(t), allocatable :: x
namelist /nml/ x
end