@@ -1848,11 +1848,13 @@ bool ClauseProcessor::processMap(
1848
1848
llvm::SmallVector<mlir::Value> bounds;
1849
1849
std::stringstream asFortran;
1850
1850
1851
- Fortran::lower::AddrAndBoundsInfo info = Fortran::lower::gatherDataOperandAddrAndBounds<
1852
- Fortran::parser::OmpObject, mlir::omp::DataBoundsType,
1853
- mlir::omp::DataBoundsOp>(
1854
- converter, firOpBuilder, semanticsContext, stmtCtx, ompObject,
1855
- clauseLocation, asFortran, bounds, treatIndexAsSection);
1851
+ Fortran::lower::AddrAndBoundsInfo info =
1852
+ Fortran::lower::gatherDataOperandAddrAndBounds<
1853
+ Fortran::parser::OmpObject, mlir::omp::DataBoundsOp,
1854
+ mlir::omp::DataBoundsType>(
1855
+ converter, firOpBuilder, semanticsContext, stmtCtx, ompObject,
1856
+ clauseLocation, asFortran, bounds, treatIndexAsSection);
1857
+
1856
1858
auto origSymbol =
1857
1859
converter.getSymbolAddress (*getOmpObjectSymbol (ompObject));
1858
1860
mlir::Value mapOp, symAddr;
@@ -2821,7 +2823,7 @@ genTargetOp(Fortran::lower::AbstractConverter &converter,
2821
2823
if (fir::isTypeWithDescriptor (baseOp.getType ())) {
2822
2824
mapOp = processDescriptorTypeMappings (
2823
2825
semanticsContext, stmtCtx, converter, baseOp.getLoc (), baseOp,
2824
- baseAddr , bounds, name.str (), mapFlag);
2826
+ info. addr , bounds, name.str (), mapFlag);
2825
2827
} else {
2826
2828
mapOp = createMapInfoOp (
2827
2829
converter.getFirOpBuilder (), baseOp.getLoc (), baseOp,
0 commit comments