@@ -5650,7 +5650,7 @@ void OmpStructureChecker::Enter(const parser::OpenMPInteropConstruct &x) {
56505650 common::visitors{
56515651 [&](const parser::OmpClause::Init &initClause) {
56525652 if (OmpVerifyModifiers (initClause.v , llvm::omp::OMPC_init,
5653- GetContext ().directiveSource , context_)) {
5653+ GetContext ().directiveSource , context_)) {
56545654
56555655 auto &modifiers{OmpGetModifiers (initClause.v )};
56565656 auto &&interopTypeModifier{
@@ -5669,9 +5669,8 @@ void OmpStructureChecker::Enter(const parser::OpenMPInteropConstruct &x) {
56695669 const auto *name{parser::Unwrap<parser::Name>(interopVar)};
56705670 const auto *objectSymbol{name->symbol };
56715671 if (llvm::is_contained (objectSymbolList, objectSymbol)) {
5672- context_.Say (
5673- GetContext ().directiveSource ,
5674- " Each interop-var may be specified for at most one action-clause of each INTEROP construct." _err_en_US);
5672+ context_.Say (GetContext ().directiveSource ,
5673+ " Each interop-var may be specified for at most one action-clause of each INTEROP construct." _err_en_US);
56755674 } else {
56765675 objectSymbolList.insert (objectSymbol);
56775676 }
@@ -5685,9 +5684,8 @@ void OmpStructureChecker::Enter(const parser::OpenMPInteropConstruct &x) {
56855684 const auto *name{parser::Unwrap<parser::Name>(interopVar)};
56865685 const auto *objectSymbol{name->symbol };
56875686 if (llvm::is_contained (objectSymbolList, objectSymbol)) {
5688- context_.Say (
5689- GetContext ().directiveSource ,
5690- " Each interop-var may be specified for at most one action-clause of each INTEROP construct." _err_en_US);
5687+ context_.Say (GetContext ().directiveSource ,
5688+ " Each interop-var may be specified for at most one action-clause of each INTEROP construct." _err_en_US);
56915689 } else {
56925690 objectSymbolList.insert (objectSymbol);
56935691 }
@@ -5698,9 +5696,8 @@ void OmpStructureChecker::Enter(const parser::OpenMPInteropConstruct &x) {
56985696 const auto *name{parser::Unwrap<parser::Name>(interopVar)};
56995697 const auto *objectSymbol{name->symbol };
57005698 if (llvm::is_contained (objectSymbolList, objectSymbol)) {
5701- context_.Say (
5702- GetContext ().directiveSource ,
5703- " Each interop-var may be specified for at most one action-clause of each INTEROP construct." _err_en_US);
5699+ context_.Say (GetContext ().directiveSource ,
5700+ " Each interop-var may be specified for at most one action-clause of each INTEROP construct." _err_en_US);
57045701 } else {
57055702 objectSymbolList.insert (objectSymbol);
57065703 }
@@ -5711,12 +5708,11 @@ void OmpStructureChecker::Enter(const parser::OpenMPInteropConstruct &x) {
57115708 }
57125709 if (targetCount > 1 || targetSyncCount > 1 ) {
57135710 context_.Say (GetContext ().directiveSource ,
5714- " Each interop-type may be specified at most once." _err_en_US);
5711+ " Each interop-type may be specified at most once." _err_en_US);
57155712 }
57165713 if (isDependClauseOccured && !targetSyncCount) {
5717- context_.Say (
5718- GetContext ().directiveSource ,
5719- " A DEPEND clause can only appear on the directive if the interop-type includes TARGETSYNC" _err_en_US);
5714+ context_.Say (GetContext ().directiveSource ,
5715+ " A DEPEND clause can only appear on the directive if the interop-type includes TARGETSYNC" _err_en_US);
57205716 }
57215717}
57225718
0 commit comments