e5675a4452
Only some fortran source files in flang/test/Lower/OpenMP have been modified. More cleanups will be performed in subsequent commits.
15 lines
484 B
Fortran
15 lines
484 B
Fortran
! This test checks lowering of OpenMP parallel master taskloop simd Directive.
|
|
|
|
! RUN: %not_todo_cmd bbc -emit-fir -fopenmp -o - %s 2>&1 | FileCheck %s
|
|
! RUN: %not_todo_cmd %flang_fc1 -emit-fir -fopenmp -o - %s 2>&1 | FileCheck %s
|
|
|
|
subroutine test_parallel_master_taskloop_simd
|
|
integer :: i, j = 1
|
|
!CHECK: not yet implemented: Composite TASKLOOP SIMD
|
|
!$omp parallel master taskloop simd
|
|
do i=1,10
|
|
j = j + 1
|
|
end do
|
|
!$omp end parallel master taskloop simd
|
|
end subroutine
|