@@ -301,23 +301,23 @@ struct ContiguousHelper {
301301};
302302} // namespace
303303
304- std::optional<bool >
305- OmpStructureChecker::IsContiguous ( const parser::OmpObject &object) {
306- return common::visit (
307- common::visitors {
308- [&]( const parser::Name &x) {
309- // Any member of a common block must be contiguous.
310- return std::optional< bool >{ true };
311- },
312- [&]( const parser::Designator &x) {
313- evaluate::ExpressionAnalyzer ea{context_};
314- if (MaybeExpr maybeExpr{ea. Analyze (x)}) {
315- return ContiguousHelper{context_}. Visit ( *maybeExpr);
316- }
317- return std::optional<bool >{};
318- },
319- },
320- object.u );
304+ std::optional<bool > OmpStructureChecker::IsContiguous (
305+ const parser::OmpObject &object) {
306+ return common::visit (common::visitors{
307+ [&]( const parser::Name &x) {
308+ // Any member of a common block must be contiguous.
309+ return std::optional< bool >{ true };
310+ },
311+ [&]( const parser::Designator &x) {
312+ evaluate::ExpressionAnalyzer ea{context_};
313+ if (MaybeExpr maybeExpr{ea. Analyze (x)}) {
314+ return ContiguousHelper{context_}. Visit (
315+ *maybeExpr);
316+ }
317+ return std::optional<bool >{};
318+ },
319+ },
320+ object.u );
321321}
322322
323323void OmpStructureChecker::CheckMultipleOccurrence (
@@ -4164,8 +4164,8 @@ struct NameHelper {
41644164};
41654165} // namespace
41664166
4167- const parser::Name *
4168- OmpStructureChecker::GetObjectName ( const parser::OmpObject &object) {
4167+ const parser::Name *OmpStructureChecker::GetObjectName (
4168+ const parser::OmpObject &object) {
41694169 return NameHelper::Visit (object);
41704170}
41714171
0 commit comments