shylie/llvm-project
1
0
Fork 0
Code Issues Pull Requests Actions 6 Packages Projects Releases Wiki Activity

[flang][OpenMP] Undeprecate accidentally deprecated TARGET LOOP (#167495)

Browse Source
This commit is contained in:
Krzysztof Parzyszek 2025-11-17 12:23:02 -06:00 committed by GitHub
parent 472e4ab0b0
commit 4be0ab659e
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
2 changed files with 13 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
flang/lib/Semantics/resolve-directives.cpp
View File

@ -2038,8 +2038,7 @@ bool OmpAttributeVisitor::Pre(const parser::OpenMPLoopConstruct &x) {
if (beginName.v == llvm::omp::OMPD_master_taskloop ||
beginName.v == llvm::omp::OMPD_master_taskloop_simd ||
beginName.v == llvm::omp::OMPD_parallel_master_taskloop ||
beginName.v == llvm::omp::OMPD_parallel_master_taskloop_simd ||
beginName.v == llvm::omp::Directive::OMPD_target_loop) {
beginName.v == llvm::omp::OMPD_parallel_master_taskloop_simd) {
unsigned version{context_.langOptions().OpenMPVersion};
IssueNonConformanceWarning(beginName.v, beginName.source, version);
}
@ -3622,8 +3621,8 @@ void OmpAttributeVisitor::IssueNonConformanceWarning(llvm::omp::Directive D,
case llvm::omp::OMPD_allocate:
setAlternativeStr("ALLOCATORS");
break;
case llvm::omp::OMPD_target_loop:
default:;
default:
break;
}
context_.Warn(common::UsageWarning::OpenMPUsage, source, "%s"_warn_en_US,
warnStrOS.str());

10
flang/test/Semantics/OpenMP/target-loop-still-there.f90 Normal file
View File

@ -0,0 +1,10 @@
!RUN: %flang_fc1 -fsyntax-only -fopenmp -fopenmp-version=60 -Werror %s | FileCheck --allow-empty %s
!CHECK-NOT: deprecated
subroutine f00
implicit none
integer :: i
!$omp target loop
do i = 1, 10
end do
end