Searched refs:fptrRank (Results 1 – 1 of 1) sorted by relevance
1852 int fptrRank{expr->Rank()}; in HandleC_F_Pointer() local1863 characteristics::TypeAndShape{*type, fptrRank}}; in HandleC_F_Pointer()1868 if (arguments[2] && fptrRank == 0) { in HandleC_F_Pointer()1871 } else if (!arguments[2] && fptrRank > 0) { in HandleC_F_Pointer()