2c31bc7c04
In this case the union inside of the `parser::DefinedOperator` contains a string name instead of the expected `parser::DefinedOperator::IntrinsicOperator`. This led to a `std::abort`. This patch adapts the code so that if it contains a string name we emit a semantic error.
11 lines
319 B
Fortran
11 lines
319 B
Fortran
! RUN: %python %S/../test_errors.py %s %flang_fc1 -fopenmp
|
|
! OpenMP Version 4.5
|
|
! 2.15.3.6 Reduction Clause
|
|
program omp_reduction
|
|
integer :: k
|
|
! misspelling. Should be "min"
|
|
!ERROR: Invalid reduction operator in REDUCTION clause.
|
|
!$omp parallel reduction(.min.:k)
|
|
!$omp end parallel
|
|
end program omp_reduction
|