Searched refs:charBox (Results 1 – 7 of 7) sorted by relevance
381 const auto *charBox = source.getCharBox(); in createTempFrom() local382 if (!charBox) in createTempFrom()384 auto len = charBox->getLen(); in createTempFrom()385 auto sourceTy = charBox->getBuffer().getType(); in createTempFrom()388 createCopy(temp, *charBox, len); in createTempFrom()392 builder.create<fir::StoreOp>(loc, charBox->getBuffer(), ref); in createTempFrom()
421 const fir::CharBoxValue *charBox = element.getCharBox(); in getElementAt() local422 assert(charBox && "substring requires CharBox base"); in getElementAt()424 return helper.createSubstring(*charBox, substringBounds); in getElementAt()
204 const fir::CharBoxValue *charBox = args.hostValue.getCharBox(); in instantiateHostTuple() local205 assert(charBox && "host value must be a fir::CharBoxValue"); in instantiateHostTuple()208 .createEmbox(*charBox); in instantiateHostTuple()
1611 if (const fir::CharBoxValue *charBox = val.getCharBox()) { in toValue() local1612 mlir::Value buffer = charBox->getBuffer(); in toValue()1620 buffer, charBox->getLen()); in toValue()2573 charArgs[i] = *charBox; in genDateAndTime()2961 const fir::CharBoxValue *charBox = args[0].getCharBox(); in genIchar() local2962 if (!charBox) in genIchar()2966 mlir::Value buffer = charBox->getBuffer(); in genIchar()3244 const fir::CharBoxValue *charBox = args[0].getCharBox(); in genLenTrim() local3245 if (!charBox) in genLenTrim()3333 const fir::CharBoxValue *charBox = args[0].getCharBox(); in genMerge() local[all …]
1278 const fir::CharBoxValue *charBox = scalarChar.getCharBox(); in replaceScalarCharacterLength() local1279 if (!charBox) in replaceScalarCharacterLength()1281 mlir::Value charAddr = charBox->getAddr(); in replaceScalarCharacterLength()2903 if (const fir::CharBoxValue *charBox = actualArg.getCharBox()) { in createScalarTempForArgThatMayBeAbsent() local2904 mlir::Value len = charBox->getLen(); in createScalarTempForArgThatMayBeAbsent()3384 const fir::CharBoxValue *charBox = value.getCharBox(); in genScalarUserDefinedAssignmentCall() local3385 assert(charBox && "argument type mismatch in elemental user assignment"); in genScalarUserDefinedAssignmentCall()3387 *charBox); in genScalarUserDefinedAssignmentCall()
2239 if (const fir::CharBoxValue *charBox = rhs.getCharBox()) in genAssignment() local2240 lengthParams.push_back(charBox->getLen()); in genAssignment()
303 auto *charBox = strLit.getCharBox(); in TEST_F() local304 EXPECT_FALSE(fir::isArray(*charBox)); in TEST_F()305 checkIntegerConstant(charBox->getLen(), builder.getCharacterLengthType(), 16); in TEST_F()308 auto addr = charBox->getBuffer(); in TEST_F()