Home
last modified time | relevance | path

Searched refs:mold (Results 1 – 21 of 21) sorted by relevance

/llvm-project-15.0.7/flang/test/Semantics/
H A Dnull01.f9062 ip0 => null(mold=1)
64 ip0 => null(mold=j)
68 dt0x = dt0(ip0=null(mold=ip0))
70 dt0x = dt0(ip0=null(mold=rp0))
72 dt1x = dt1(ip1=null(mold=rp1))
74 dt2x = dt2(pps0=null(mold=dt2x%pps0))
76 dt2x = dt2(pps0=null(mold=dt3x%pps1))
78 dt3x = dt3(pps1=null(mold=dt2x%pps0))
79 dt3x = dt3(pps1=null(mold=dt3x%pps1))
81 call canbenull(null(mold=ip0), null(mold=rp0)) ! fine
[all …]
H A Dallocate09.f9075 allocate(param_ca_4_2, mold= src_c_4_2_5_6_5_8)
76 allocate(param_defaulted, mold=WithParam(5))
78 allocate(param_defaulted, mold=src_c_1_2_5_6_5_8)
89 allocate(x2(10), mold=srcx8_array)
93 allocate(param_ca_4_2, mold=src_a_8_2)
99 allocate(param_ca_4_2, mold=src_b_8_def_8_3)
103 allocate(param_ta_4_assumed, mold=src_a_8_2)
105 allocate(param_ca_4_assumed, mold=src_a_8_def)
109 allocate(param_ta_4_deferred, mold=src_a_8_2)
117 allocate(param_ca_4_2, mold=src_c_5_2_5_6_5_8)
[all …]
H A Dallocate08.f9045 allocate(x2, mold=srcx2)
53 allocate(aa2, up2, bp2, npbp2, mold=srcb2)
60 allocate(x1, mold=src_complex)
64 allocate(bp2(3)%x, mold=src_logical)
66 allocate(unrelat, mold=srca)
70 allocate(npaa1, mold=srcb)
74 allocate(npca1, bp1, npbp1, mold=srcc)
119 allocate(x, mold=func())
123 allocate(x, mold=x'1')
125 allocate(x, mold=sub)
[all …]
H A Dallocate02.f9018 allocate(x2, mold=mld)
30 allocate(x8, mold=mld, stat=stat, mold=mld)
33 allocate(x9, mold=mld, errmsg=msg, stat=stat, errmsg= msg)
43 allocate(real:: y2, mold=mld)
45 allocate(y3, source=src, stat=stat, errmsg=msg, mold=mld)
47 allocate(real:: y4, source=src, stat=stat, errmsg=msg, mold=mld)
H A Dallocate03.f9026 character(len=5) mold local
79 allocate(ca1, MOLD = mold)
82 allocate(ca1, SOURCE = mold)
86 allocate(cp1, cp2(2), mold = cp1mold)
87 allocate(cp3, cp4(2), mold = cp3mold)
88 allocate(cp5, cp6(2), mold = cp5mold)
H A Dresolve63.f90302 j = x1 - null(mold=x1)
303 j = null(mold=x1) - null(mold=x1)
304 j = null(mold=x1) - x1
306 j = x1 / null(mold=x1)
307 j = null() - null(mold=x1)
308 j = null(mold=x1) - null()
311 j = null() / null(mold=x1)
313 j = null(mold=x1) / null()
341 call generic(null(mold=ip), null()) ! ok
342 call generic(null(), null(mold=ip)) ! ok
H A Dnull-init.f9085 integer :: mold component
89 data obj/null(mold=j), null(j)/ ! both fine
H A Dassociated.f90151 intProcPointer1 => null(mold=realProcPointer1)
153 lvar = associated(intProcPointer1, null(mold=realProcPointer1))
/llvm-project-15.0.7/flang/runtime/
H A Dmisc-intrinsic.cpp19 const Descriptor &mold, const char *sourceFile, int line, in TransferImpl() argument
22 std::size_t elementBytes{mold.ElementBytes()}; in TransferImpl()
23 result.Establish(mold.type(), elementBytes, nullptr, rank, nullptr, in TransferImpl()
24 CFI_attribute_allocatable, mold.Addendum() != nullptr); in TransferImpl()
28 if (const DescriptorAddendum * addendum{mold.Addendum()}) { in TransferImpl()
57 const Descriptor &mold, const char *sourceFile, int line) { in RTNAME()
59 if (mold.rank() > 0) { in RTNAME()
62 if (std::size_t moldElementBytes{mold.ElementBytes()}) { in RTNAME()
74 result, source, mold, sourceFile, line, std::move(elements)); in RTNAME()
78 const Descriptor &mold, const char *sourceFile, int line, in RTNAME()
[all …]
H A Dallocatable.cpp63 Descriptor &descriptor, const Descriptor &mold) { in RTNAME()
64 descriptor = mold; in RTNAME()
H A Dpointer.cpp56 void RTNAME(PointerApplyMold)(Descriptor &pointer, const Descriptor &mold) { in RTNAME()
57 pointer = mold; in RTNAME()
/llvm-project-15.0.7/flang/unittests/Runtime/
H A DMiscIntrinsic.cpp25 auto &mold{staticDesc[1].descriptor()}; in TEST() local
26 mold.Establish(TypeCategory::Real, 4, nullptr, 0); in TEST()
27 RTNAME(Transfer)(result, *source, mold, __FILE__, __LINE__); in TEST()
39 auto &mold{staticDesc[1].descriptor()}; in TEST() local
41 mold.Establish(TypeCategory::Complex, 4, nullptr, 1, extent); in TEST()
42 RTNAME(Transfer)(result, *source, mold, __FILE__, __LINE__); in TEST()
59 auto &mold{staticDesc[1].descriptor()}; in TEST() local
61 mold.Establish(TypeCategory::Complex, 4, nullptr, 1, extent); in TEST()
62 RTNAME(TransferSize)(result, *source, mold, __FILE__, __LINE__, 1); in TEST()
78 auto &mold{staticDesc[1].descriptor()}; in TEST() local
[all …]
/llvm-project-15.0.7/flang/include/flang/Runtime/
H A Dmisc-intrinsic.h23 const Descriptor &mold, const char *sourceFile, int line);
25 const Descriptor &mold, const char *sourceFile, int line,
H A Dallocatable.h49 void RTNAME(AllocatableApplyMold)(Descriptor &, const Descriptor &mold);
H A Dpointer.h45 void RTNAME(PointerApplyMold)(Descriptor &, const Descriptor &mold);
/llvm-project-15.0.7/flang/lib/Semantics/
H A Dcheck-allocate.cpp167 [&](const parser::AllocOpt::Mold &mold) { in CheckAllocateOptions() argument
178 parserSourceExpr = &mold.v.value(); in CheckAllocateOptions()
/llvm-project-15.0.7/flang/lib/Lower/
H A DAllocatable.cpp297 [&](const Fortran::parser::AllocOpt::Mold &mold) { in visitAllocateOptions() argument
298 moldExpr = Fortran::semantics::GetExpr(mold.v.value()); in visitAllocateOptions()
H A DIntrinsicCall.cpp3501 const auto *mold = args[0].getBoxOf<fir::MutableBoxValue>(); in genNull() local
3502 assert(mold && "MOLD must be a pointer or allocatable"); in genNull()
3503 fir::BoxType boxType = mold->getBoxTy(); in genNull()
3506 builder, loc, boxType, mold->nonDeferredLenParams()); in genNull()
3508 return fir::MutableBoxValue(boxStorage, mold->nonDeferredLenParams(), {}); in genNull()
4162 mlir::Value mold = builder.createBox(loc, args[1]); in genTransfer() local
4163 fir::BoxValue moldTmp = mold; in genTransfer()
4180 Fortran::lower::genTransfer(builder, loc, resultIrBox, source, mold); in genTransfer()
4187 Fortran::lower::genTransfer(builder, loc, resultIrBox, source, mold); in genTransfer()
4190 Fortran::lower::genTransferSize(builder, loc, resultIrBox, source, mold, in genTransfer()
H A DConvertExpr.cpp2406 ExtValue genArrayTempFromMold(const ExtValue &mold, in genArrayTempFromMold() argument
2408 mlir::Type type = fir::dyn_cast_ptrOrBoxEleTy(fir::getBase(mold).getType()); in genArrayTempFromMold()
2412 fir::factory::getExtents(loc, builder, mold); in genArrayTempFromMold()
2414 fir::getTypeParams(mold); in genArrayTempFromMold()
2419 ? fir::factory::readCharLen(builder, loc, mold) in genArrayTempFromMold()
/llvm-project-15.0.7/flang/lib/Evaluate/
H A Dintrinsics.cpp2082 if (Expr<SomeType> * mold{arguments[0]->UnwrapExpr()}) { in HandleNull()
2084 if (IsAllocatableOrPointer(*mold)) { in HandleNull()
2087 if (IsProcedurePointerTarget(*mold)) { in HandleNull()
2089 const Symbol *last{GetLastSymbol(*mold)}; in HandleNull()
2103 } else if (auto type{mold->GetType()}) { in HandleNull()
2106 *type, GetShape(context, *mold)}; in HandleNull()
/llvm-project-15.0.7/llvm/cmake/modules/
H A DAddLLVM.cmake213 if("${stdout}" MATCHES "^mold")
216 message(STATUS "Linker detection: mold")