File tree Expand file tree Collapse file tree 2 files changed +8
-9
lines changed Expand file tree Collapse file tree 2 files changed +8
-9
lines changed Original file line number Diff line number Diff line change @@ -459,7 +459,6 @@ void Fortran::lower::omp::lowerAtomic(
459459 } else {
460460 int action0 = analysis.op0 .what & analysis.Action ;
461461 int action1 = analysis.op1 .what & analysis.Action ;
462-
463462 mlir::Operation *captureOp = nullptr ;
464463 fir::FirOpBuilder::InsertPoint preAt = builder.saveInsertionPoint ();
465464 fir::FirOpBuilder::InsertPoint atomicAt, postAt;
Original file line number Diff line number Diff line change @@ -693,14 +693,14 @@ OmpStructureChecker::CheckUpdateCapture(
693693 " In ATOMIC UPDATE operation with CAPTURE neither statement could be the update or the capture" _err_en_US);
694694 }};
695695
696- auto checkSameAtomicLocation{[&]( const evaluate::Assignment &upd,
697- const evaluate::Assignment &cap) {
698- // For now, this is a placeholder. A complete implementation would need
699- // to walk the entire expression tree of upd.rhs to find all DataRef nodes
700- // and compare them structurally with the atomic variable (upd.lhs).
701- // This is complex and requires proper expression traversal.
702- // The MLIR verification layer catches these cases as a safety net.
703- }};
696+ auto checkSameAtomicLocation{
697+ [&]( const evaluate::Assignment &upd, const evaluate::Assignment &cap) {
698+ // For now, this is a placeholder. A complete implementation would need
699+ // to walk the entire expression tree of upd.rhs to find all DataRef
700+ // nodes and compare them structurally with the atomic variable
701+ // (upd.lhs). This is complex and requires proper expression traversal.
702+ // The MLIR verification layer catches these cases as a safety net.
703+ }};
704704
705705 auto makeSelectionFromDet{[&](int det) -> ReturnTy {
706706 // If det != 0, then the checks unambiguously suggest a specific
You can’t perform that action at this time.
0 commit comments