Searched refs:arrayexpr (Results 1 – 2 of 2) sorted by relevance
4690 gfc_expr *arrayexpr; in gfc_conv_intrinsic_arith() local4729 arrayexpr = arg_array->expr; in gfc_conv_intrinsic_arith()4750 arrayss = gfc_walk_expr (arrayexpr); in gfc_conv_intrinsic_arith()4811 gfc_conv_expr_val (&arrayse, arrayexpr); in gfc_conv_intrinsic_arith()5175 gfc_expr *arrayexpr; in gfc_conv_intrinsic_minmaxloc() local5199 arrayexpr = actual->expr; in gfc_conv_intrinsic_minmaxloc()5204 if (arrayexpr->ts.type == BT_CHARACTER) in gfc_conv_intrinsic_minmaxloc()5231 arrayss = gfc_walk_expr (arrayexpr); in gfc_conv_intrinsic_minmaxloc()5250 if (gfc_array_size (arrayexpr, &asize)) in gfc_conv_intrinsic_minmaxloc()5261 limit = gfc_create_var (gfc_typenode_for_spec (&arrayexpr->ts), "limit"); in gfc_conv_intrinsic_minmaxloc()[all …]
4839 gfc_expr *arrayexpr; in gfc_conv_intrinsic_arith() local4878 arrayexpr = arg_array->expr; in gfc_conv_intrinsic_arith()4899 arrayss = gfc_walk_expr (arrayexpr); in gfc_conv_intrinsic_arith()4960 gfc_conv_expr_val (&arrayse, arrayexpr); in gfc_conv_intrinsic_arith()5322 gfc_expr *arrayexpr; in gfc_conv_intrinsic_minmaxloc() local5346 arrayexpr = actual->expr; in gfc_conv_intrinsic_minmaxloc()5351 if (arrayexpr->ts.type == BT_CHARACTER) in gfc_conv_intrinsic_minmaxloc()5375 arrayss = gfc_walk_expr (arrayexpr); in gfc_conv_intrinsic_minmaxloc()5394 if (gfc_array_size (arrayexpr, &asize)) in gfc_conv_intrinsic_minmaxloc()5405 limit = gfc_create_var (gfc_typenode_for_spec (&arrayexpr->ts), "limit"); in gfc_conv_intrinsic_minmaxloc()[all …]