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