Searched refs:last_caf_ref (Results 1 – 2 of 2) sorted by relevance
110 gfc_ref *ref = caf_expr->ref, *last_caf_ref = NULL; in gfc_get_ultimate_alloc_ptr_comps_caf_token() local118 last_caf_ref = ref; in gfc_get_ultimate_alloc_ptr_comps_caf_token()122 if (last_caf_ref == NULL) in gfc_get_ultimate_alloc_ptr_comps_caf_token()125 tree comp = last_caf_ref->u.c.component->caf_token, caf; in gfc_get_ultimate_alloc_ptr_comps_caf_token()127 bool comp_ref = !last_caf_ref->u.c.component->attr.dimension; in gfc_get_ultimate_alloc_ptr_comps_caf_token()131 gfc_free_ref_list (last_caf_ref->next); in gfc_get_ultimate_alloc_ptr_comps_caf_token()132 last_caf_ref->next = NULL; in gfc_get_ultimate_alloc_ptr_comps_caf_token()133 caf_expr->rank = comp_ref ? 0 : last_caf_ref->u.c.component->as->rank; in gfc_get_ultimate_alloc_ptr_comps_caf_token()
152 gfc_ref *ref = caf_expr->ref, *last_caf_ref = NULL; in gfc_get_ultimate_alloc_ptr_comps_caf_token() local160 last_caf_ref = ref; in gfc_get_ultimate_alloc_ptr_comps_caf_token()164 if (last_caf_ref == NULL) in gfc_get_ultimate_alloc_ptr_comps_caf_token()167 tree comp = last_caf_ref->u.c.component->caf_token, caf; in gfc_get_ultimate_alloc_ptr_comps_caf_token()169 bool comp_ref = !last_caf_ref->u.c.component->attr.dimension; in gfc_get_ultimate_alloc_ptr_comps_caf_token()173 gfc_free_ref_list (last_caf_ref->next); in gfc_get_ultimate_alloc_ptr_comps_caf_token()174 last_caf_ref->next = NULL; in gfc_get_ultimate_alloc_ptr_comps_caf_token()175 caf_expr->rank = comp_ref ? 0 : last_caf_ref->u.c.component->as->rank; in gfc_get_ultimate_alloc_ptr_comps_caf_token()