diff options
Diffstat (limited to 'flang/lib/Lower/Allocatable.cpp')
| -rw-r--r-- | flang/lib/Lower/Allocatable.cpp | 23 |
1 files changed, 12 insertions, 11 deletions
diff --git a/flang/lib/Lower/Allocatable.cpp b/flang/lib/Lower/Allocatable.cpp index 068f5d25967c..77e02898ac9f 100644 --- a/flang/lib/Lower/Allocatable.cpp +++ b/flang/lib/Lower/Allocatable.cpp @@ -350,10 +350,10 @@ private: void visitAllocateOptions() { for (const auto &allocOption : std::get<std::list<Fortran::parser::AllocOpt>>(stmt.t)) - std::visit( + Fortran::common::visit( Fortran::common::visitors{ [&](const Fortran::parser::StatOrErrmsg &statOrErr) { - std::visit( + Fortran::common::visit( Fortran::common::visitors{ [&](const Fortran::parser::StatVariable &statVar) { statExpr = Fortran::semantics::GetExpr(statVar); @@ -898,15 +898,16 @@ void Fortran::lower::genDeallocateStmt( const Fortran::lower::SomeExpr *errMsgExpr = nullptr; for (const Fortran::parser::StatOrErrmsg &statOrErr : std::get<std::list<Fortran::parser::StatOrErrmsg>>(stmt.t)) - std::visit(Fortran::common::visitors{ - [&](const Fortran::parser::StatVariable &statVar) { - statExpr = Fortran::semantics::GetExpr(statVar); - }, - [&](const Fortran::parser::MsgVariable &errMsgVar) { - errMsgExpr = Fortran::semantics::GetExpr(errMsgVar); - }, - }, - statOrErr.u); + Fortran::common::visit( + Fortran::common::visitors{ + [&](const Fortran::parser::StatVariable &statVar) { + statExpr = Fortran::semantics::GetExpr(statVar); + }, + [&](const Fortran::parser::MsgVariable &errMsgVar) { + errMsgExpr = Fortran::semantics::GetExpr(errMsgVar); + }, + }, + statOrErr.u); ErrorManager errorManager; errorManager.init(converter, loc, statExpr, errMsgExpr); fir::FirOpBuilder &builder = converter.getFirOpBuilder(); |
