Increase timeout factor for hppa*-*-* in gcc.dg/long_branch.c
[official-gcc.git] / gcc / testsuite / gfortran.dg / namelist_2.f90
blobf6dd2b42e096820fe431c8d898184800a0927774
1 ! { dg-do compile }
2 ! Check that variable with intent(in) cannot be a member of a namelist
3 subroutine namelist_2(x)
4 integer,intent(in) :: x
5 namelist /n/ x
6 read(*,n) ! { dg-error "is INTENT" }
7 end subroutine namelist_2