From e0c15c4952147ba0ea4aff871f3f0a6a99039820 Mon Sep 17 00:00:00 2001 From: David Truby Date: Wed, 18 Sep 2019 10:12:57 +0100 Subject: [PATCH] [flang] Added grammar comments for enter data and exit data directives Original-commit: flang-compiler/f18@a1e6cded2f0c0af9fda8ea53ac8c6636843e07e1 Reviewed-on: https://github.com/flang-compiler/f18/pull/748 --- flang/lib/semantics/check-omp-structure.cc | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/flang/lib/semantics/check-omp-structure.cc b/flang/lib/semantics/check-omp-structure.cc index 28f39cf53f27..1a312a136327 100644 --- a/flang/lib/semantics/check-omp-structure.cc +++ b/flang/lib/semantics/check-omp-structure.cc @@ -550,7 +550,11 @@ void OmpStructureChecker::Enter( PushContext(dir.source, OmpDirective::TASKYIELD); } break; case parser::OmpSimpleStandaloneDirective::Directive::TargetEnterData: { - // 2.10.2 target-enter-data + // 2.10.2 target-enter-data-clause -> if-clause | + // device-clause | + // map-clause | + // depend-clause | + // nowait-clause PushContext(dir.source, OmpDirective::TARGET_ENTER_DATA); OmpClauseSet allowed{OmpClause::MAP, OmpClause::DEPEND, OmpClause::NOWAIT}; SetContextAllowed(allowed); @@ -559,7 +563,11 @@ void OmpStructureChecker::Enter( SetContextRequired({OmpClause::MAP}); } break; case parser::OmpSimpleStandaloneDirective::Directive::TargetExitData: { - // 2.10.3 target-exit-data + // 2.10.3 target-enter-data-clause -> if-clause | + // device-clause | + // map-clause | + // depend-clause | + // nowait-clause PushContext(dir.source, OmpDirective::TARGET_EXIT_DATA); OmpClauseSet allowed{OmpClause::MAP, OmpClause::DEPEND, OmpClause::NOWAIT}; SetContextAllowed(allowed);