[LLVM-FLANG] [OpenMP] [Taskloop] - Add test case with cancel construct inside taskloop (#129862)
Added a test case with cancel construct inside taskloop. Currently taskloop lowering is not supported so below error is issued: "not yet implemented: Taskloop construct" Once the lowering patch is merged, todo error should be issued for cancel construct. "not yet implemented: OpenMPCancelConstruct"
This commit is contained in:
parent
2894719314
commit
c02019141c
14
flang/test/Lower/OpenMP/Todo/taskloop-cancel.f90
Normal file
14
flang/test/Lower/OpenMP/Todo/taskloop-cancel.f90
Normal file
@ -0,0 +1,14 @@
|
||||
! RUN: %not_todo_cmd bbc -emit-fir -fopenmp -o - %s -fopenmp-version=50 2>&1 | FileCheck %s
|
||||
! RUN: %not_todo_cmd %flang_fc1 -emit-fir -fopenmp -o - %s -fopenmp-version=50 2>&1 | FileCheck %s
|
||||
|
||||
! CHECK: not yet implemented: Taskloop construct
|
||||
subroutine omp_taskloop
|
||||
integer :: i
|
||||
!$omp parallel
|
||||
!$omp taskloop
|
||||
do i = 1, 10
|
||||
!$omp cancel taskgroup
|
||||
end do
|
||||
!$omp end taskloop
|
||||
!$omp end parallel
|
||||
end subroutine omp_taskloop
|
||||
Loading…
x
Reference in New Issue
Block a user