[flang-commits] [flang] [flang][OpenMP] Fix declare target after #200446 (PR #203364)
Eugene Epshteyn via flang-commits
flang-commits at lists.llvm.org
Fri Jun 12 10:51:12 PDT 2026
================
@@ -3076,24 +3076,28 @@ void OmpAttributeVisitor::PropagateOmpFlagToEquivalenceSet(
void OmpAttributeVisitor::ResolveOmpCommonBlock(
const parser::Name &name, Symbol::Flag ompFlag) {
+ bool cbResolved{false};
if (name.symbol) {
if (auto *details{name.symbol->detailsIf<CommonBlockDetails>()}) {
if (!details->objects().empty()) {
// Common block already resolved
- return;
+ cbResolved = true;
}
}
}
- if (auto *symbol{ResolveOmpCommonBlockName(&name)}) {
+ parser::Name cbName{name};
+ Symbol *originalCB{ResolveOmpCommonBlockName(&cbName)};
----------------
eugeneepshteyn wrote:
Can do `cbCloned` determination right here as well, so won't need `originalCB` below.
https://github.com/llvm/llvm-project/pull/203364
More information about the flang-commits
mailing list