[flang-commits] [flang] 43cb8f0 - [flang][openacc/mp][NFC] Remove unused baseAddr argument (#75537)

[via flang-commits]

Author: Valentin Clement (バレンタイン クレメン)
Date: 2023-12-15T09:46:47-08:00
New Revision: 43cb8f00f059baae4330f7ff2c9c3c1f51b6cc73

URL: https://github.com/llvm/llvm-project/commit/43cb8f00f059baae4330f7ff2c9c3c1f51b6cc73
DIFF: https://github.com/llvm/llvm-project/commit/43cb8f00f059baae4330f7ff2c9c3c1f51b6cc73.diff

LOG: [flang][openacc/mp][NFC] Remove unused baseAddr argument (#75537)

`baseAddr` is not used in `genBaseBoundsOps` just remove it.

Added: 
    

Modified: 
    flang/lib/Lower/DirectivesCommon.h
    flang/lib/Lower/OpenMP.cpp

Removed: 
    


################################################################################
diff  --git a/flang/lib/Lower/DirectivesCommon.h b/flang/lib/Lower/DirectivesCommon.h
index abe4c93da6a7d4..52d0b245001685 100644
--- a/flang/lib/Lower/DirectivesCommon.h
+++ b/flang/lib/Lower/DirectivesCommon.h
@@ -666,7 +666,7 @@ template <typename BoundsOp, typename BoundsType>
 llvm::SmallVector<mlir::Value>
 genBaseBoundsOps(fir::FirOpBuilder &builder, mlir::Location loc,
                  Fortran::lower::AbstractConverter &converter,
-                 fir::ExtendedValue dataExv, mlir::Value baseAddr) {
+                 fir::ExtendedValue dataExv) {
   mlir::Type idxTy = builder.getIndexType();
   mlir::Type boundTy = builder.getType<BoundsType>();
   llvm::SmallVector<mlir::Value> bounds;
@@ -899,7 +899,7 @@ mlir::Value gatherDataOperandAddrAndBounds(
                 if (fir::unwrapRefType(baseAddr.getType())
                         .isa<fir::SequenceType>())
                   bounds = genBaseBoundsOps<BoundsOp, BoundsType>(
-                      builder, operandLocation, converter, compExv, baseAddr);
+                      builder, operandLocation, converter, compExv);
                 asFortran << (*expr).AsFortran();
 
                 if (auto loadOp = mlir::dyn_cast_or_null<fir::LoadOp>(
@@ -949,7 +949,7 @@ mlir::Value gatherDataOperandAddrAndBounds(
                   if (fir::unwrapRefType(baseAddr.getType())
                           .isa<fir::SequenceType>())
                     bounds = genBaseBoundsOps<BoundsOp, BoundsType>(
-                        builder, operandLocation, converter, dataExv, baseAddr);
+                        builder, operandLocation, converter, dataExv);
                   asFortran << name.ToString();
                 } else { // Unsupported
                   llvm::report_fatal_error(

diff  --git a/flang/lib/Lower/OpenMP.cpp b/flang/lib/Lower/OpenMP.cpp
index fc8f03107fadf2..22d7cc24418867 100644
--- a/flang/lib/Lower/OpenMP.cpp
+++ b/flang/lib/Lower/OpenMP.cpp
@@ -2668,7 +2668,7 @@ genTargetOp(Fortran::lower::AbstractConverter &converter,
           bounds = Fortran::lower::genBaseBoundsOps<mlir::omp::DataBoundsOp,
                                                     mlir::omp::DataBoundsType>(
               converter.getFirOpBuilder(), converter.getCurrentLocation(),
-              converter, dataExv, baseAddr);
+              converter, dataExv);
 
         llvm::omp::OpenMPOffloadMappingFlags mapFlag =
             llvm::omp::OpenMPOffloadMappingFlags::OMP_MAP_IMPLICIT;