gcc/testsuite/gfortran.dg/namelist_74.f90

! { dg-do compile }
! PR fortran/50556
subroutine foo
   save i
   namelist /i/ ii    ! { dg-error "cannot have the SAVE attribute" }
end subroutine foo
subroutine bar
   namelist /i/ ii
   save i             ! { dg-error "cannot have the SAVE attribute" }
end subroutine bar