375f48942b
Add support for the standalone OpenMP tile construct: ```f90 !$omp tile sizes(...) DO i = 1, 100 ... ``` This is complementary to #143715 which added support for the tile construct as part of another loop-associated construct such as worksharing-loop, distribute, etc.
16 lines
345 B
Fortran
16 lines
345 B
Fortran
! Testing the Semantics of tile
|
|
!RUN: %python %S/../test_errors.py %s %flang -fopenmp -fopenmp-version=51
|
|
|
|
|
|
subroutine loop_assoc
|
|
implicit none
|
|
integer :: i = 0
|
|
|
|
!$omp tile sizes(2)
|
|
!ERROR: The associated loop of a loop-associated directive cannot be a DO WHILE.
|
|
do while (i <= 10)
|
|
i = i + 1
|
|
print *, i
|
|
end do
|
|
end subroutine
|