blob: 067417a8cda3be4b1dfcc801613abeae9bc41fe0 [file] [log] [blame] [edit]
!RUN: %python %S/../test_errors.py %s %flang -fopenmp -fopenmp-version=51
subroutine f00(x)
!ERROR: The ERROR directive with AT(EXECUTION) cannot appear in the specification part
!$omp error at(execution) message("Haaa!")
integer :: x
end