! { dg-do compile } ! ! PR fortran/45530 ! ! Contributed by david.sagan@gmail.com ! program test implicit none type c_struct type (g_struct), pointer :: g end type type g_struct type (p_struct), pointer :: p end type type p_struct type (region_struct), pointer :: r end type type region_struct type (p_struct) plot end type type (c_struct) curve(10) namelist / params / curve ! { dg-error "ALLOCATABLE or POINTER components and thus requires a defined input/output" } end program