llvm-project/flang/test/Lower/OpenMP/master_taskloop_simd.f90
Tarun Prabhu e5675a4452
[flang][NFC] Strip trailing whitespace from tests (9 of N)
Only some fortran source files in flang/test/Lower/OpenMP have been
modified. More cleanups will be performed in subsequent commits.
2025-12-03 14:54:30 -07:00

15 lines
450 B
Fortran

! This test checks lowering of OpenMP 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_master_taskloop_simd()
integer :: i, j = 1
!CHECK: not yet implemented: Composite TASKLOOP SIMD
!$omp master taskloop simd
do i=1,10
j = j + 1
end do
!$omp end master taskloop simd
end subroutine