Home
last modified time | relevance | path

Searched refs:REF_SUBSTRING (Results 1 – 25 of 40) sorted by relevance

12

/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Ddata.c130 gcc_assert (ref->type == REF_SUBSTRING); in create_character_initializer()
243 if (ref->type == REF_SUBSTRING) in gfc_assign_data_value()
H A Dexpr.c606 case REF_SUBSTRING: in gfc_free_ref_list()
774 case REF_SUBSTRING: in gfc_copy_ref()
1963 && last_ref->type == REF_SUBSTRING) in simplify_const_ref()
2021 case REF_SUBSTRING: in simplify_const_ref()
2060 case REF_SUBSTRING: in simplify_ref_chain()
3362 case REF_SUBSTRING: in check_references()
4395 case REF_SUBSTRING: in gfc_check_pointer_assign()
5289 case REF_SUBSTRING: in gfc_get_full_arrayspec_from_expr()
5413 case REF_SUBSTRING: in gfc_traverse_expr()
5799 case REF_SUBSTRING: in gfc_is_coarray()
[all …]
H A Ddependency.c176 case REF_SUBSTRING: in are_identical_variables()
907 case REF_SUBSTRING: in gfc_ref_needs_temporary_p()
1845 case REF_SUBSTRING: in contains_forall_index_p()
2144 case REF_SUBSTRING: in gfc_dep_resolver()
H A Dprimary.c902 ref->type = REF_SUBSTRING; in match_substring()
1197 && e->ref && e->ref->type == REF_SUBSTRING in match_string_constant()
2735 && ref->next && ref->next->type == REF_SUBSTRING) in gfc_variable_attr()
2757 case REF_SUBSTRING: in gfc_variable_attr()
2936 case REF_SUBSTRING: in caf_variable_attr()
H A Dfrontend-passes.c274 if (ref->type == REF_SUBSTRING) in realloc_string_callback()
647 if (ref->type == REF_SUBSTRING) in constant_string_length()
2234 if ((*rr)->type == REF_SUBSTRING || (*rr)->type == REF_ARRAY) in optimize_trim()
2247 ref->type = REF_SUBSTRING; in optimize_trim()
3388 if (r->type == REF_SUBSTRING) in freeze_references()
5021 case REF_SUBSTRING: in gfc_expr_walker()
H A Dtrans-common.c891 case REF_SUBSTRING: in calculate_offset()
H A Dcheck.c1194 for (ra = a->ref; ra != NULL && ra->type != REF_SUBSTRING; ra = ra->next) in gfc_var_strlen()
3108 while (ref && ref->type != REF_SUBSTRING) in gfc_check_ichar_iachar()
3111 gcc_assert (ref == NULL || ref->type == REF_SUBSTRING); in gfc_check_ichar_iachar()
H A Dinterface.c2674 || (ref->next->type == REF_SUBSTRING && !ref->next->next))) in compare_parameter()
2840 if (ref->type == REF_SUBSTRING && ref->u.ss.start in get_expr_storage_size()
3660 case REF_SUBSTRING: in compare_actual_expr()
H A Dresolve.c4945 case REF_SUBSTRING: in find_array_spec()
5177 if (char_ref->type == REF_SUBSTRING || char_ref->type == REF_INQUIRY) in gfc_resolve_substring_charlen()
5290 case REF_SUBSTRING: in gfc_resolve_ref()
5375 case REF_SUBSTRING: in gfc_resolve_ref()
7103 && e->ref->type != REF_SUBSTRING) in gfc_resolve_expr()
7512 case REF_SUBSTRING: in resolve_deallocate_expr()
7809 case REF_SUBSTRING: in resolve_allocate_expr()
16885 ref->type = REF_SUBSTRING; in resolve_equivalence()
17044 if (r->type == REF_SUBSTRING) in resolve_equivalence()
H A Darray.c2165 if (ref->type == REF_SUBSTRING in gfc_resolve_character_array_constructor()
H A Dgfortran.h2000 { REF_ARRAY, REF_COMPONENT, REF_SUBSTRING, REF_INQUIRY }; enumerator
H A Dtrans-stmt.c3945 if (lref->type == REF_SUBSTRING) in check_forall_dependencies()
3948 if (rref->type == REF_SUBSTRING) in check_forall_dependencies()
4636 if (expr1->ref && expr1->ref->type == REF_SUBSTRING) in gfc_trans_assign_need_temp()
H A Dtrans-expr.c2069 case REF_SUBSTRING: in gfc_get_expr_charlen()
3034 case REF_SUBSTRING: in gfc_conv_variable()
4516 case REF_SUBSTRING: in gfc_apply_interface_mapping_to_ref()
8821 gcc_assert (ref == NULL || ref->type == REF_SUBSTRING); in gfc_conv_substring_expr()
10666 if (ref->type == REF_SUBSTRING) in alloc_scalar_allocatable_for_assignment()
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Ddata.cc130 gcc_assert (ref->type == REF_SUBSTRING); in create_character_initializer()
263 if (ref->type == REF_SUBSTRING) in gfc_assign_data_value()
H A Dexpr.cc614 case REF_SUBSTRING: in gfc_free_ref_list()
782 case REF_SUBSTRING: in gfc_copy_ref()
1988 && last_ref->type == REF_SUBSTRING) in simplify_const_ref()
2046 case REF_SUBSTRING: in simplify_const_ref()
2085 case REF_SUBSTRING: in simplify_ref_chain()
3394 case REF_SUBSTRING: in check_references()
4427 case REF_SUBSTRING: in gfc_check_pointer_assign()
5329 case REF_SUBSTRING: in gfc_get_full_arrayspec_from_expr()
5453 case REF_SUBSTRING: in gfc_traverse_expr()
5839 case REF_SUBSTRING: in gfc_is_coarray()
[all …]
H A Ddependency.cc177 case REF_SUBSTRING: in are_identical_variables()
908 case REF_SUBSTRING: in gfc_ref_needs_temporary_p()
1846 case REF_SUBSTRING: in contains_forall_index_p()
2145 case REF_SUBSTRING: in gfc_dep_resolver()
H A Dprimary.cc881 ref->type = REF_SUBSTRING; in match_substring()
1176 && e->ref && e->ref->type == REF_SUBSTRING in match_string_constant()
2739 && ref->next && ref->next->type == REF_SUBSTRING) in gfc_variable_attr()
2764 case REF_SUBSTRING: in gfc_variable_attr()
2944 case REF_SUBSTRING: in caf_variable_attr()
H A Dfrontend-passes.cc274 if (ref->type == REF_SUBSTRING) in realloc_string_callback()
647 if (ref->type == REF_SUBSTRING) in constant_string_length()
2234 if ((*rr)->type == REF_SUBSTRING || (*rr)->type == REF_ARRAY) in optimize_trim()
2247 ref->type = REF_SUBSTRING; in optimize_trim()
3666 if (r->type == REF_SUBSTRING) in freeze_references()
5301 case REF_SUBSTRING: in gfc_expr_walker()
H A Dtrans-common.cc920 case REF_SUBSTRING: in calculate_offset()
H A Dcheck.cc1196 for (ra = a->ref; ra != NULL && ra->type != REF_SUBSTRING; ra = ra->next) in gfc_var_strlen()
3112 while (ref && ref->type != REF_SUBSTRING) in gfc_check_ichar_iachar()
3115 gcc_assert (ref == NULL || ref->type == REF_SUBSTRING); in gfc_check_ichar_iachar()
H A Dinterface.cc2741 || (ref->next->type == REF_SUBSTRING && !ref->next->next))) in compare_parameter()
2907 if (ref->type == REF_SUBSTRING && ref->u.ss.start in get_expr_storage_size()
3863 case REF_SUBSTRING: in compare_actual_expr()
H A Dresolve.cc5031 case REF_SUBSTRING: in find_array_spec()
5263 if (char_ref->type == REF_SUBSTRING || char_ref->type == REF_INQUIRY) in gfc_resolve_substring_charlen()
5373 case REF_SUBSTRING: in gfc_resolve_ref()
5458 case REF_SUBSTRING: in gfc_resolve_ref()
7225 && e->ref->type != REF_SUBSTRING) in gfc_resolve_expr()
7634 case REF_SUBSTRING: in resolve_deallocate_expr()
7931 case REF_SUBSTRING: in resolve_allocate_expr()
17120 ref->type = REF_SUBSTRING; in resolve_equivalence()
17279 if (r->type == REF_SUBSTRING) in resolve_equivalence()
H A Darray.cc2177 if (ref->type == REF_SUBSTRING in gfc_resolve_character_array_constructor()
H A Dtrans-stmt.cc3981 if (lref->type == REF_SUBSTRING) in check_forall_dependencies()
3984 if (rref->type == REF_SUBSTRING) in check_forall_dependencies()
4672 if (expr1->ref && expr1->ref->type == REF_SUBSTRING) in gfc_trans_assign_need_temp()
H A Dtrans-expr.cc2163 case REF_SUBSTRING: in gfc_get_expr_charlen()
3136 case REF_SUBSTRING: in gfc_conv_variable()
4605 case REF_SUBSTRING: in gfc_apply_interface_mapping_to_ref()
9364 gcc_assert (ref == NULL || ref->type == REF_SUBSTRING); in gfc_conv_substring_expr()
11204 if (ref->type == REF_SUBSTRING) in alloc_scalar_allocatable_for_assignment()

12