Searched refs:typeAndShape (Results 1 – 7 of 7) sorted by relevance
91 if (const auto *typeAndShape{result->GetTypeAndShape()}) { in GetType() local92 return typeAndShape->type(); in GetType()108 if (const auto *typeAndShape{result->GetTypeAndShape()}) { in Rank() local109 CHECK(!typeAndShape->attrs().test( in Rank()111 return typeAndShape->Rank(); in Rank()
1871 characteristics::TypeAndShape typeAndShape{ in Match() local1874 characteristics::DummyDataObject{std::move(typeAndShape)}); in Match()1876 characteristics::TypeAndShape typeAndShape{ in Match() local1879 characteristics::DummyDataObject{std::move(typeAndShape)}); in Match()1897 characteristics::TypeAndShape typeAndShape{resultType.value(), resultRank}; in Match() local1898 characteristics::FunctionResult funcResult{std::move(typeAndShape)}; in Match()2105 characteristics::TypeAndShape typeAndShape{ in HandleNull() local2108 "mold"s, characteristics::DummyDataObject{typeAndShape}); in HandleNull()2109 fResult.emplace(std::move(typeAndShape)); in HandleNull()
828 } else if (const auto *typeAndShape{GetTypeAndShape()}) { in CanBeReturnedViaImplicitInterface() local829 if (typeAndShape->Rank() > 0) { in CanBeReturnedViaImplicitInterface()832 const DynamicType &type{typeAndShape->type()}; in CanBeReturnedViaImplicitInterface()
215 const Fortran::evaluate::characteristics::TypeAndShape *typeAndShape = in walkResultLengths() local217 assert(typeAndShape && "no result type"); in walkResultLengths()218 Fortran::evaluate::DynamicType dynamicType = typeAndShape->type(); in walkResultLengths()678 const Fortran::evaluate::characteristics::TypeAndShape *typeAndShape = in handleImplicitResult() local680 assert(typeAndShape && "expect type for non proc pointer result"); in handleImplicitResult()681 Fortran::evaluate::DynamicType dynamicType = typeAndShape->type(); in handleImplicitResult()939 const Fortran::evaluate::characteristics::TypeAndShape *typeAndShape = in handleExplicitResult() local941 assert(typeAndShape && "expect type for non proc pointer result"); in handleExplicitResult()942 mlir::Type mlirType = translateDynamicType(typeAndShape->type()); in handleExplicitResult()943 fir::SequenceType::Shape bounds = getBounds(typeAndShape->shape()); in handleExplicitResult()[all …]
712 auto typeAndShape{evaluate::characteristics::TypeAndShape::Characterize( in DescribeComponent() local714 CHECK(typeAndShape.has_value()); in DescribeComponent()715 auto dyType{typeAndShape->type()}; in DescribeComponent()716 const auto &shape{typeAndShape->shape()}; in DescribeComponent()729 auto len{typeAndShape->LEN()}; in DescribeComponent()1061 const auto &typeAndShape{ in DescribeSpecialProc() local1065 if (typeAndShape.attrs().test( in DescribeSpecialProc()1071 if (int rank{evaluate::GetRank(typeAndShape.shape())}; rank > 0) { in DescribeSpecialProc()
880 const auto *typeAndShape{result.GetTypeAndShape()}; in IsResultOkToDiffer() local881 if (!typeAndShape || typeAndShape->Rank() != 0) { in IsResultOkToDiffer()884 auto category{typeAndShape->type().category()}; in IsResultOkToDiffer()889 int kind{typeAndShape->type().kind()}; in IsResultOkToDiffer()
2368 if (const auto *typeAndShape{result->GetTypeAndShape()}) { in CheckBadExplicitType() local2370 typeAndShape->Characterize(intrinsic, GetFoldingContext())}) { in CheckBadExplicitType()2371 if (!declared->type().IsTkCompatibleWith(typeAndShape->type())) { in CheckBadExplicitType()2374 typeAndShape->AsFortran(), intrinsic.name(), in CheckBadExplicitType()