[Flang][OpenMP]Add parsing support for DISPATCH construct (#121982)

[llvm-project.git] / flang / test / Parser / recovery07.f90

! RUN: not %flang_fc1 -fsyntax-only %s 2>&1 | FileCheck %s
! CHECK: error: expected ':'
! CHECK: in the context: loop control
do concurrent(I = 1, N)
end do
end