1! PR fortran/78026
2select type (a) ! { dg-error "Selector shall be polymorphic in SELECT TYPE statement" }
3end select
4!$omp declare simd(b) ! { dg-error "Unexpected !.OMP DECLARE SIMD statement" }
5end ! { dg-error "should refer to containing procedure" "" { target *-*-* } .-1 }
6