summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/nullify_4.f90
blob: 48dcf72ca9d24a4a697d05a0bf06fe998fde418c (plain)
1
2
3
4
5
6
7
8
! { dg-do compile }
! PR fortran/40246
!
! Check error recovery; was crashing before.
!
real, pointer :: ptr
nullify(ptr, mesh%coarser) ! { dg-error "Syntax error in NULLIFY statement" }
end