Removed the old code

Author: eugeneepshteyn

flang/lib/Lower/ConvertCall.cpp

@@ -1184,19 +1184,6 @@ static bool isParameterObjectOrSubObject(hlfir::Entity entity) {
   return foundParameter;
 }
 
-
-static bool
-isSimplyContiguous(const Fortran::evaluate::ActualArgument &arg,
-                   Fortran::evaluate::FoldingContext &foldingContext) {
-  if (const auto *expr = arg.UnwrapExpr())
-    return Fortran::evaluate::IsSimplyContiguous(*expr, foldingContext);
-  const Fortran::semantics::Symbol *sym = arg.GetAssumedTypeDummy();
-  assert(sym &&
-         "expect ActualArguments to be expression or assumed-type symbols");
-  return sym->Rank() == 0 ||
-         Fortran::evaluate::IsSimplyContiguous(*sym, foldingContext);
-}
-
 /// When dummy is not ALLOCATABLE, POINTER and is not passed in register,
 /// prepare the actual argument according to the interface. Do as needed:
 /// - address element if this is an array argument in an elemental call.
@@ -1265,25 +1252,12 @@ static PreparedDummyArgument preparePresentUserCallActualArgument(
     Fortran::evaluate::FoldingContext &foldingContext{
         callContext.converter.getFoldingContext()};
 
-    // DEBUG: old code
-    const bool oldMustDoCopyInOut =
-        actual.isArray() && arg.mustBeMadeContiguous() &&
-        (passingPolymorphicToNonPolymorphic ||
-         !isSimplyContiguous(*arg.entity, foldingContext));
-    const bool oldMustDoCopyOut = arg.mayBeModifiedByCall();
-
     bool suggestCopyIn = Fortran::evaluate::MayNeedCopy(
         arg.entity, arg.characteristics, foldingContext, /*forCopyOut=*/false);
     bool suggestCopyOut = Fortran::evaluate::MayNeedCopy(
         arg.entity, arg.characteristics, foldingContext, /*forCopyOut=*/true);
     mustDoCopyIn = actual.isArray() && suggestCopyIn;
     mustDoCopyOut = actual.isArray() && suggestCopyOut;
-
-    // DEBUG:
-    llvm::dbgs() << "copyinout: oldMustDoCopyInOut = " << oldMustDoCopyInOut
-      << ", mustDoCopyIn = " << mustDoCopyIn
-      << "| oldMustDoCopyOut = " << oldMustDoCopyOut
-      << ", mustDoCopyOut " << mustDoCopyOut << "\n";
   }
 
   const bool actualIsAssumedRank = actual.isAssumedRank();