Lines Matching refs:box
119 const fir::MutableBoxValue &box, in genRuntimeSetBounds() argument
123 box.isPointer() in genRuntimeSetBounds()
128 llvm::SmallVector<mlir::Value> args{box.getAddr(), dimIndex, lowerBound, in genRuntimeSetBounds()
140 const fir::MutableBoxValue &box, in genRuntimeInitCharacter() argument
143 box.isPointer() in genRuntimeInitCharacter()
153 args.push_back(builder.createConvert(loc, inputTypes[0], box.getAddr())); in genRuntimeInitCharacter()
155 int kind = box.getEleTy().cast<fir::CharacterType>().getFKind(); in genRuntimeInitCharacter()
157 int rank = box.rank(); in genRuntimeInitCharacter()
168 const fir::MutableBoxValue &box, in genRuntimeAllocate() argument
171 box.isPointer() in genRuntimeAllocate()
176 box.getAddr(), errorManager.hasStat, errorManager.errMsgAddr, in genRuntimeAllocate()
187 const fir::MutableBoxValue &box, in genRuntimeDeallocate() argument
190 mlir::Value boxAddress = fir::factory::getMutableIRBox(builder, loc, box); in genRuntimeDeallocate()
192 box.isPointer() in genRuntimeDeallocate()
333 const fir::MutableBoxValue &box) { in genInlinedAllocation() argument
365 fir::factory::genInlinedAllocation(builder, loc, box, lbounds, extents, in genInlinedAllocation()
370 const fir::MutableBoxValue &box) { in genSimpleAllocation() argument
371 if (!box.isDerived() && !errorManager.hasStatSpec() && in genSimpleAllocation()
374 genInlinedAllocation(alloc, box); in genSimpleAllocation()
379 if (box.isPointer()) { in genSimpleAllocation()
385 builder, loc, box.getBoxTy(), box.nonDeferredLenParams()); in genSimpleAllocation()
386 builder.create<fir::StoreOp>(loc, nullPointer, box.getAddr()); in genSimpleAllocation()
388 assert(box.isAllocatable() && "must be an allocatable"); in genSimpleAllocation()
391 fir::factory::getMutableIRBox(builder, loc, box); in genSimpleAllocation()
396 genSetType(alloc, box); in genSimpleAllocation()
397 genSetDeferredLengthParameters(alloc, box); in genSimpleAllocation()
416 genRuntimeSetBounds(builder, loc, box, dimIndex, lb, ub); in genSimpleAllocation()
418 mlir::Value stat = genRuntimeAllocate(builder, loc, box, errorManager); in genSimpleAllocation()
419 fir::factory::syncMutableBoxFromIRBox(builder, loc, box); in genSimpleAllocation()
451 const fir::MutableBoxValue &box) { in genSetDeferredLengthParameters() argument
457 if (box.isCharacter()) in genSetDeferredLengthParameters()
458 genRuntimeInitCharacter(builder, loc, box, lenParams[0]); in genSetDeferredLengthParameters()
460 if (box.isDerived()) in genSetDeferredLengthParameters()
511 const fir::MutableBoxValue &box, in genDeallocate() argument
514 if (!box.isDerived() && !errorManager.hasStatSpec() && !useAllocateRuntime) { in genDeallocate()
515 fir::factory::genInlinedDeallocate(builder, loc, box); in genDeallocate()
521 mlir::Value stat = genRuntimeDeallocate(builder, loc, box, errorManager); in genDeallocate()
522 fir::factory::syncMutableBoxFromIRBox(builder, loc, box); in genDeallocate()
548 fir::MutableBoxValue box = in genDeallocateStmt() local
550 genDeallocate(builder, loc, box, errorManager); in genDeallocateStmt()
663 fir::MutableBoxValue box(boxAddr, nonDeferredParams, mutableProperties); in createMutableBox() local
666 fir::factory::disassociateMutableBox(builder, loc, box); in createMutableBox()
667 return box; in createMutableBox()
683 const fir::MutableBoxValue &box, const Fortran::lower::SomeExpr &source, in associateMutableBox() argument
687 fir::factory::disassociateMutableBox(builder, loc, box); in associateMutableBox()
699 fir::factory::associateMutableBox(builder, loc, box, rhs, lbounds); in associateMutableBox()