Lines Matching defs:con

569                    const Fortran::evaluate::Constant<T> &con) {
572   Fortran::evaluate::ConstantSubscripts subscripts = con.lbounds();
577           builder.getIntegerAttr(idxTy, subscripts[i] - con.lbounds()[i]));
581   if (Fortran::evaluate::GetSize(con.shape()) == 0)
586           genScalarLit<T::kind>(builder, loc, con.At(subscripts), con.LEN(),
590     } while (con.IncrementSubscripts(subscripts));
596           genScalarLit(converter, loc, con.At(subscripts), eleTy,
600     } while (con.IncrementSubscripts(subscripts));
609                                          builder, loc, con.At(subscripts)));
612       bool nextIsSame = con.IncrementSubscripts(nextSubscripts) &&
613                         con.At(subscripts) == con.At(nextSubscripts);
638     } while (con.IncrementSubscripts(subscripts));
695             const Fortran::evaluate::Constant<T> &con,
699       Fortran::evaluate::GetSize(con.shape());
703   fir::SequenceType::Shape shape(con.shape().begin(), con.shape().end());
706     typeParams.push_back(con.LEN());
710         converter, con.GetType().GetDerivedTypeSpec());
716                           ? genOutlineArrayLit(converter, loc, arrayTy, con)
717                           : genInlinedArrayLit(converter, loc, arrayTy, con);
725   if (llvm::any_of(con.lbounds(), [](auto lb) { return lb != 1; }))
726     for (auto lb : con.lbounds())
730     mlir::Value len = builder.createIntegerConstant(loc, idxTy, con.LEN());