diff options
Diffstat (limited to 'flang/lib/Lower/IO.cpp')
| -rw-r--r-- | flang/lib/Lower/IO.cpp | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/flang/lib/Lower/IO.cpp b/flang/lib/Lower/IO.cpp index 97ef991cb399..9e98b230b676 100644 --- a/flang/lib/Lower/IO.cpp +++ b/flang/lib/Lower/IO.cpp @@ -1388,7 +1388,7 @@ static void threadSpecs(Fortran::lower::AbstractConverter &converter, fir::FirOpBuilder &builder = converter.getFirOpBuilder(); for (const auto &spec : specList) { makeNextConditionalOn(builder, loc, checkResult, ok); - ok = std::visit( + ok = Fortran::common::visit( Fortran::common::visitors{ [&](const Fortran::parser::IoControlSpec::Size &x) -> mlir::Value { // Size must be queried after the related READ runtime calls, not @@ -1425,7 +1425,7 @@ ConditionSpecInfo lowerErrorSpec(Fortran::lower::AbstractConverter &converter, ConditionSpecInfo csi; const Fortran::lower::SomeExpr *ioMsgExpr = nullptr; for (const auto &spec : specList) { - std::visit( + Fortran::common::visit( Fortran::common::visitors{ [&](const Fortran::parser::StatVariable &var) { csi.ioStatExpr = Fortran::semantics::GetExpr(var); @@ -2397,7 +2397,7 @@ lowerIdExpr(Fortran::lower::AbstractConverter &converter, mlir::Location loc, const std::list<Fortran::parser::InquireSpec> &ispecs, Fortran::lower::StatementContext &stmtCtx) { for (const Fortran::parser::InquireSpec &spec : ispecs) - if (mlir::Value v = std::visit( + if (mlir::Value v = Fortran::common::visit( Fortran::common::visitors{ [&](const Fortran::parser::IdExpr &idExpr) { return fir::getBase(converter.genExprValue( @@ -2419,11 +2419,11 @@ static void threadInquire(Fortran::lower::AbstractConverter &converter, mlir::Value idExpr = lowerIdExpr(converter, loc, ispecs, stmtCtx); for (const Fortran::parser::InquireSpec &spec : ispecs) { makeNextConditionalOn(builder, loc, checkResult, ok); - ok = std::visit(Fortran::common::visitors{[&](const auto &x) { - return genInquireSpec(converter, loc, cookie, idExpr, x, - stmtCtx); - }}, - spec.u); + ok = Fortran::common::visit(Fortran::common::visitors{[&](const auto &x) { + return genInquireSpec(converter, loc, cookie, + idExpr, x, stmtCtx); + }}, + spec.u); } } |
