xref: /llvm-project/flang/test/Semantics/OpenMP/error.f90 (revision adeff9f63a24f60b0bf240bf13e40bbf7c1dd0e8)
1!RUN: %python %S/../test_errors.py %s %flang -fopenmp -fopenmp-version=51
2
3subroutine f00(x)
4!ERROR: The ERROR directive with AT(EXECUTION) cannot appear in the specification part
5  !$omp error at(execution) message("Haaa!")
6  integer :: x
7end
8
9