Lines Matching refs:stmtCtx
179 Fortran::lower::StatementContext &stmtCtx) { in genEndIO() argument
199 stmtCtx.finalizeAndPop(); in genEndIO()
206 fir::getBase(converter.genExprAddr(loc, csi.ioStatExpr, stmtCtx)); in genEndIO()
243 Fortran::lower::StatementContext &stmtCtx) { in getNamelistGroup() argument
326 fir::ExtendedValue exv = converter.genExprAddr(*expr, stmtCtx); in getNamelistGroup()
398 Fortran::lower::StatementContext &stmtCtx) { in genNamelistIO() argument
403 mlir::Value groupAddr = getNamelistGroup(converter, symbol, stmtCtx); in genNamelistIO()
477 Fortran::lower::StatementContext stmtCtx; in genOutputItemList() local
491 mlir::Value box = fir::getBase(converter.genExprBox(loc, *expr, stmtCtx)); in genOutputItemList()
494 fir::ExtendedValue exv = converter.genExprAddr(loc, expr, stmtCtx); in genOutputItemList()
505 fir::ExtendedValue itemBox = converter.genExprValue(loc, expr, stmtCtx); in genOutputItemList()
624 Fortran::lower::StatementContext stmtCtx; in genInputItemList() local
630 Fortran::lower::genVectorSubscriptBox(loc, converter, stmtCtx, *expr); in genInputItemList()
660 ? converter.genExprBox(loc, *expr, stmtCtx) in genInputItemList()
661 : converter.genExprAddr(loc, expr, stmtCtx); in genInputItemList()
672 Fortran::lower::StatementContext stmtCtx; in genIoLoop() local
680 Fortran::evaluate::AsGenericExpr(loopSym).value(), stmtCtx)); in genIoLoop()
683 converter.genExprValue(*Fortran::semantics::GetExpr(expr), stmtCtx)); in genIoLoop()
803 mlir::Type lenTy, Fortran::lower::StatementContext &stmtCtx) { in genBuffer() argument
805 fir::ExtendedValue exprAddr = converter.genExprAddr(expr, stmtCtx); in genBuffer()
835 Fortran::lower::StatementContext &stmtCtx, const A &syntax, in lowerStringLit() argument
841 auto [buff, len] = genBuffer(converter, loc, *expr, strTy, lenTy, stmtCtx);
1212 Fortran::lower::StatementContext stmtCtx; in lowerErrorSpec() local
1213 csi.ioMsg = converter.genExprAddr(loc, ioMsgExpr, stmtCtx); in lowerErrorSpec()
1319 Fortran::lower::StatementContext &stmtCtx) { in getVariableBufferRequiredDescriptor() argument
1321 converter.genExprAddr(var.typedExpr->v.value(), stmtCtx); in getVariableBufferRequiredDescriptor()
1336 Fortran::lower::StatementContext &stmtCtx) { in maybeGetInternalIODescriptor() argument
1339 return getVariableBufferRequiredDescriptor(converter, *var, stmtCtx); in maybeGetInternalIODescriptor()
1342 return getVariableBufferRequiredDescriptor(converter, *var, stmtCtx); in maybeGetInternalIODescriptor()
1387 Fortran::lower::StatementContext &stmtCtx) { in lowerReferenceAsStringSelect() argument
1457 auto label = fir::getBase(converter.genExprValue(loc, &expr, stmtCtx)); in lowerReferenceAsStringSelect()
1478 mlir::Type lenTy, Fortran::lower::StatementContext &stmtCtx) { in genFormat() argument
1492 return lowerStringLit(converter, loc, stmtCtx, *pExpr, strTy, lenTy); in genFormat()
1499 stmtCtx); in genFormat()
1513 Fortran ::lower::StatementContext &stmtCtx) { in getFormat()
1515 return genFormat(converter, loc, *stmt.format, strTy, lenTy, stmtCtx); in getFormat()
1517 strTy, lenTy, stmtCtx); in getFormat()
1524 Fortran::lower::StatementContext &stmtCtx) { in getFormat() argument
1526 strTy, lenTy, stmtCtx); in getFormat()
1534 Fortran::lower::StatementContext &stmtCtx) { in getBuffer() argument
1540 return genBuffer(converter, loc, *expr, strTy, lenTy, stmtCtx); in getBuffer()
1548 Fortran::lower::StatementContext &stmtCtx) { in genIOUnitNumber() argument
1550 auto rawUnit = fir::getBase(converter.genExprValue(loc, iounit, stmtCtx)); in genIOUnitNumber()
1593 stmtCtx.pushScope(); in genIOUnitNumber()
1604 Fortran::lower::StatementContext &stmtCtx) { in genIOUnit() argument
1609 ty, csi, stmtCtx); in genIOUnit()
1618 Fortran::lower::StatementContext &stmtCtx) { in getIOUnit() argument
1621 return genIOUnit(converter, loc, iounit, ty, csi, stmtCtx); in getIOUnit()
1631 Fortran::lower::StatementContext stmtCtx; in genBasicIOStmt() local
1638 beginFuncTy.getInput(0), csi, stmtCtx); in genBasicIOStmt()
1651 stmtCtx); in genBasicIOStmt()
1685 Fortran::lower::StatementContext stmtCtx; in genNewunitSpec() local
1693 fir::getBase(converter.genExprAddr(loc, var, stmtCtx))); in genNewunitSpec()
1706 Fortran::lower::StatementContext stmtCtx; in genOpenStatement() local
1717 beginFuncTy.getInput(0), csi, stmtCtx); in genOpenStatement()
1738 return genEndIO(converter, loc, cookie, csi, stmtCtx); in genOpenStatement()
1751 Fortran::lower::StatementContext stmtCtx; in genWaitStatement() local
1761 beginFuncTy.getInput(0), csi, stmtCtx); in genWaitStatement()
1765 loc, getExpr<Fortran::parser::IdExpr>(stmt), stmtCtx)); in genWaitStatement()
1776 stmtCtx); in genWaitStatement()
1853 Fortran::lower::StatementContext &stmtCtx) { in genBeginDataTransferCallArgs() argument
1860 ioFuncTy.getInput(ioArgs.size() + 1), stmtCtx); in genBeginDataTransferCallArgs()
1874 ioFuncTy.getInput(ioArgs.size() + 1), stmtCtx); in genBeginDataTransferCallArgs()
1889 stmtCtx)); in genBeginDataTransferCallArgs()
1909 Fortran::lower::StatementContext stmtCtx; in genDataTransferStmt() local
1915 isInternal ? maybeGetInternalIODescriptor(converter, stmt, stmtCtx) in genDataTransferStmt()
1934 isList || isNml, isInternal, isAsync, descRef, csi, stmtCtx); in genDataTransferStmt()
1952 csi.hasTransferConditionSpec(), ok, stmtCtx); in genDataTransferStmt()
1961 csi.hasTransferConditionSpec(), ok, stmtCtx); in genDataTransferStmt()
1971 stmtCtx.finalize(); in genDataTransferStmt()
1979 return genEndIO(converter, loc, cookie, csi, stmtCtx); in genDataTransferStmt()
2025 Fortran::lower::StatementContext &stmtCtx) { in genInquireSpec() argument
2035 Fortran::lower::StatementContext &stmtCtx) { in genInquireSpec() argument
2046 fir::ExtendedValue str = converter.genExprAddr(loc, varExpr, stmtCtx); in genInquireSpec()
2065 Fortran::lower::StatementContext &stmtCtx) { in genInquireSpec() argument
2076 mlir::Value addr = fir::getBase(converter.genExprAddr(loc, varExpr, stmtCtx)); in genInquireSpec()
2102 Fortran::lower::StatementContext &stmtCtx) { in genInquireSpec() argument
2117 stmtCtx)); in genInquireSpec()
2139 Fortran::lower::StatementContext &stmtCtx) { in lowerIdExpr() argument
2145 loc, Fortran::semantics::GetExpr(idExpr), stmtCtx)); in lowerIdExpr()
2158 Fortran::lower::StatementContext &stmtCtx) { in threadInquire() argument
2160 mlir::Value idExpr = lowerIdExpr(converter, loc, ispecs, stmtCtx); in threadInquire()
2165 stmtCtx); in threadInquire()
2175 Fortran::lower::StatementContext stmtCtx; in genInquireStatement() local
2198 beginFuncTy.getInput(0), csi, stmtCtx); in genInquireStatement()
2206 converter.genExprAddr(loc, exprPair.first, stmtCtx); in genInquireStatement()
2231 fir::getBase(converter.genExprAddr(loc, ioLengthVar, stmtCtx)); in genInquireStatement()
2241 return genEndIO(converter, loc, cookie, csi, stmtCtx); in genInquireStatement()
2253 stmtCtx); in genInquireStatement()
2256 return genEndIO(converter, loc, cookie, csi, stmtCtx); in genInquireStatement()