Skip to content

[Flang][OpenMP] Reenable and fix final few tests 6/6 #93295

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
merged 1 commit into from
May 24, 2024
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
21 changes: 21 additions & 0 deletions flang/test/Semantics/OpenMP/do02.f90
Original file line number Diff line number Diff line change
@@ -0,0 +1,21 @@
! RUN: %python %S/../test_errors.py %s %flang_fc1 %openmp_flags
! XFAIL: *

! OpenMP Version 4.5
! 2.7.1 Loop Construct
! Exit statement terminating !$OMP DO loop

program omp_do
integer i, j, k

!$omp do
do i = 1, 10
do j = 1, 10
print *, "Hello"
end do
!ERROR: EXIT statement terminating !$OMP DO loop
exit
end do
!$omp end do

end program omp_do
4 changes: 1 addition & 3 deletions flang/test/Semantics/OpenMP/sections03.f90
Original file line number Diff line number Diff line change
@@ -1,6 +1,4 @@
! UNSUPPORTED: system-windows
! Marking as unsupported due to suspected long runtime on Windows
! RUN: %python %S/../test_errors.py %s %flang -fopenmp
! RUN: %python %S/../test_errors.py %s %flang_fc1 %openmp_flags
!XFAIL: *
! OpenMP version 5.0.0
! 2.8.1 sections construct
Expand Down
4 changes: 1 addition & 3 deletions flang/test/Semantics/OpenMP/simd03.f90
Original file line number Diff line number Diff line change
@@ -1,6 +1,4 @@
! UNSUPPORTED: system-windows
! Marking as unsupported due to suspected long runtime on Windows
! RUN: %S/test_errors.sh %s %t %flang -fopenmp
! RUN: %python %S/../test_errors.py %s %flang_fc1 %openmp_flags
! XFAIL: *

! OpenMP Version 4.5
Expand Down
25 changes: 25 additions & 0 deletions flang/test/Semantics/OpenMP/taskloop03.f90
Original file line number Diff line number Diff line change
@@ -0,0 +1,25 @@
! RUN: %python %S/../test_errors.py %s %flang_fc1 %openmp_flags
! XFAIL: *

! OpenMP Version 4.5
! 2.9.2 taskloop Construct
! All loops associated with the taskloop construct must be perfectly nested,
! there must be no intervening code or any OpenMP directive between
! any two loops

program omp_taskloop
integer i, j

!$omp taskloop private(j) grainsize(500) nogroup
do i=1, 10000
do j=1, i
call loop_body(i, j)
end do
!ERROR: Loops associated with !$omp taskloop is not perfectly nested
!$omp single
print *, "omp single"
!$omp end single
end do
!$omp end taskloop

end program omp_taskloop
Loading