Lines Matching refs:arrayexpr

4690   gfc_expr *arrayexpr;  in gfc_conv_intrinsic_arith()  local
4729 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() local
5199 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()
5262 switch (arrayexpr->ts.type) in gfc_conv_intrinsic_minmaxloc()
5265 tmp = gfc_build_inf_or_huge (TREE_TYPE (limit), arrayexpr->ts.kind); in gfc_conv_intrinsic_minmaxloc()
5269 n = gfc_validate_kind (arrayexpr->ts.type, arrayexpr->ts.kind, false); in gfc_conv_intrinsic_minmaxloc()
5271 arrayexpr->ts.kind); in gfc_conv_intrinsic_minmaxloc()
5284 if (op == GT_EXPR && arrayexpr->ts.type == BT_INTEGER) in gfc_conv_intrinsic_minmaxloc()
5382 gfc_conv_expr_val (&arrayse, arrayexpr); in gfc_conv_intrinsic_minmaxloc()
5512 gfc_conv_expr_val (&arrayse, arrayexpr); in gfc_conv_intrinsic_minmaxloc()
5962 gfc_expr *arrayexpr; in gfc_conv_intrinsic_minmaxval() local
5974 arrayexpr = actual->expr; in gfc_conv_intrinsic_minmaxval()
5976 if (arrayexpr->ts.type == BT_CHARACTER) in gfc_conv_intrinsic_minmaxval()
6049 arrayss = gfc_walk_expr (arrayexpr); in gfc_conv_intrinsic_minmaxval()
6067 if (gfc_array_size (arrayexpr, &asize)) in gfc_conv_intrinsic_minmaxval()
6162 gfc_conv_expr_val (&arrayse, arrayexpr); in gfc_conv_intrinsic_minmaxval()
6268 gfc_conv_expr_val (&arrayse, arrayexpr); in gfc_conv_intrinsic_minmaxval()