1! { dg-do compile }
2!
3! PR fortran/32905 - accepts types with ultimate POINTER components
4!
5MODULE types
6  type :: tp3
7    real :: x
8    integer, pointer :: i
9  end type
10
11  type :: tp2
12    type(tp3) :: t
13  end type
14
15  type :: tp1
16    integer :: i
17    type(tp2) :: t
18  end type
19END MODULE
20
21MODULE nml
22USE types
23   type(tp1) :: t1
24   type(tp3) :: t3
25
26   namelist /a/ t1    ! { dg-error "has ALLOCATABLE or POINTER components and thus requires a defined input/output" }
27   namelist /b/ t3    ! { dg-error "has ALLOCATABLE or POINTER components and thus requires a defined input/output" }
28END MODULE
29