1! PR fortran/72716
2! { dg-do compile }
3
4block data
5  !$omp declare simd (z)	! { dg-error "statement is not allowed inside of BLOCK DATA" }
6end block data
7