13 lines · plain
1! RUN: %not_todo_cmd %flang_fc1 -emit-fir -fopenmp -fopenmp-version=51 -o - %s 2>&1 | FileCheck %s2 3! CHECK: not yet implemented: OpenMPDispatchConstruct4program p5 integer r6 r = 17!$omp dispatch nowait8 call foo()9contains10 subroutine foo11 end subroutine12end program p13