1! { dg-do compile }
2! { dg-options "-std=f95" }
3! Check that a pointer cannot be a member of a namelist
4program namelist_3
5  integer,pointer :: x
6  allocate (x)
7  namelist /n/ x ! { dg-error "NAMELIST attribute conflicts with POINTER attribute" }
8end program namelist_3
9