Home
last modified time | relevance | path

Searched refs:array_expr (Results 1 – 6 of 6) sorted by relevance

/netbsd-src/external/gpl3/gcc/dist/gcc/cp/
H A Ddecl2.cc371 grok_array_decl (location_t loc, tree array_expr, tree index_exp, in grok_array_decl() argument
376 tree orig_array_expr = array_expr; in grok_array_decl()
382 if (error_operand_p (array_expr) || error_operand_p (index_exp)) in grok_array_decl()
387 if (type_dependent_expression_p (array_expr) in grok_array_decl()
394 return build_min_nt_loc (loc, ARRAY_REF, array_expr, index_exp, in grok_array_decl()
397 array_expr = build_non_dependent_expr (array_expr); in grok_array_decl()
407 type = TREE_TYPE (array_expr); in grok_array_decl()
419 expr = build_new_op (loc, ARRAY_REF, LOOKUP_NORMAL, array_expr, in grok_array_decl()
423 expr = build_op_subscript (loc, array_expr, index_exp_list, &overload, in grok_array_decl()
427 expr = build_op_subscript (loc, array_expr, index_exp_list, in grok_array_decl()
[all …]
/netbsd-src/external/gpl3/gcc.old/dist/gcc/cp/
H A Ddecl2.c371 grok_array_decl (location_t loc, tree array_expr, tree index_exp, in grok_array_decl() argument
376 tree orig_array_expr = array_expr; in grok_array_decl()
380 if (error_operand_p (array_expr) || error_operand_p (index_exp)) in grok_array_decl()
385 if (type_dependent_expression_p (array_expr) in grok_array_decl()
387 return build_min_nt_loc (loc, ARRAY_REF, array_expr, index_exp, in grok_array_decl()
389 array_expr = build_non_dependent_expr (array_expr); in grok_array_decl()
393 type = TREE_TYPE (array_expr); in grok_array_decl()
403 expr = build_new_op (loc, ARRAY_REF, LOOKUP_NORMAL, array_expr, in grok_array_decl()
416 p1 = array_expr; in grok_array_decl()
418 p1 = build_expr_type_conversion (WANT_POINTER, array_expr, false); in grok_array_decl()
[all …]
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Dtrans.cc1114 gfc_expr *array_expr; in gfc_build_final_call() local
1122 array_expr = gfc_copy_expr (var); in gfc_build_final_call()
1125 if (array_expr->rank) in gfc_build_final_call()
1127 gfc_add_class_array_ref (array_expr); in gfc_build_final_call()
1129 gfc_conv_expr_descriptor (&se, array_expr); in gfc_build_final_call()
1134 gfc_add_data_component (array_expr); in gfc_build_final_call()
1135 gfc_conv_expr (&se, array_expr); in gfc_build_final_call()
1140 if (!gfc_is_coarray (array_expr)) in gfc_build_final_call()
1150 gfc_free_expr (array_expr); in gfc_build_final_call()
H A Dtrans-intrinsic.cc1668 gfc_expr *array_expr, *tmp_stat; in gfc_conv_intrinsic_caf_get() local
1685 array_expr = (lhs == NULL_TREE) ? expr->value.function.actual->expr : expr; in gfc_conv_intrinsic_caf_get()
1686 type = gfc_typenode_for_spec (&array_expr->ts); in gfc_conv_intrinsic_caf_get()
1690 caf_attr_store = gfc_caf_attr (array_expr); in gfc_conv_intrinsic_caf_get()
1717 caf_reference = conv_expr_ref_to_caf_ref (&se->pre, array_expr); in gfc_conv_intrinsic_caf_get()
1723 if (array_expr->ts.type == BT_CHARACTER) in gfc_conv_intrinsic_caf_get()
1725 if (array_expr->rank == 0) in gfc_conv_intrinsic_caf_get()
1729 if (array_expr->ts.type == BT_CHARACTER) in gfc_conv_intrinsic_caf_get()
1733 array_expr->ts.u.cl->backend_decl); in gfc_conv_intrinsic_caf_get()
1734 argse.string_length = array_expr->ts.u.cl->backend_decl; in gfc_conv_intrinsic_caf_get()
[all …]
/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dtrans.c1041 gfc_expr *array_expr; in gfc_build_final_call() local
1049 array_expr = gfc_copy_expr (var); in gfc_build_final_call()
1052 if (array_expr->rank) in gfc_build_final_call()
1054 gfc_add_class_array_ref (array_expr); in gfc_build_final_call()
1056 gfc_conv_expr_descriptor (&se, array_expr); in gfc_build_final_call()
1061 gfc_add_data_component (array_expr); in gfc_build_final_call()
1062 gfc_conv_expr (&se, array_expr); in gfc_build_final_call()
1067 if (!gfc_is_coarray (array_expr)) in gfc_build_final_call()
1077 gfc_free_expr (array_expr); in gfc_build_final_call()
H A Dtrans-intrinsic.c1660 gfc_expr *array_expr, *tmp_stat; in gfc_conv_intrinsic_caf_get() local
1677 array_expr = (lhs == NULL_TREE) ? expr->value.function.actual->expr : expr; in gfc_conv_intrinsic_caf_get()
1678 type = gfc_typenode_for_spec (&array_expr->ts); in gfc_conv_intrinsic_caf_get()
1682 caf_attr_store = gfc_caf_attr (array_expr); in gfc_conv_intrinsic_caf_get()
1709 caf_reference = conv_expr_ref_to_caf_ref (&se->pre, array_expr); in gfc_conv_intrinsic_caf_get()
1715 if (array_expr->ts.type == BT_CHARACTER) in gfc_conv_intrinsic_caf_get()
1717 if (array_expr->rank == 0) in gfc_conv_intrinsic_caf_get()
1721 if (array_expr->ts.type == BT_CHARACTER) in gfc_conv_intrinsic_caf_get()
1725 array_expr->ts.u.cl->backend_decl); in gfc_conv_intrinsic_caf_get()
1726 argse.string_length = array_expr->ts.u.cl->backend_decl; in gfc_conv_intrinsic_caf_get()
[all …]