Lines Matching refs:allocatable

55   else if (attr.allocatable)  in get_scalar_to_descriptor_type()
93 if ((attr.pointer || attr.allocatable) && attr.intent != INTENT_IN) in gfc_conv_scalar_to_descriptor()
115 && (ref->u.c.component->attr.allocatable in gfc_get_ultimate_alloc_ptr_comps_caf_token()
411 if (array_ref && CLASS_DATA (ref->u.c.component)->attr.allocatable) in gfc_find_and_cut_at_last_class_ref()
1943 && !sym->attr.allocatable in gfc_conv_expr_present()
1946 && !CLASS_DATA (sym)->attr.allocatable in gfc_conv_expr_present()
2699 if (((c->attr.pointer || c->attr.allocatable) in gfc_conv_component_ref()
2789 if ((sym->attr.pointer || sym->attr.allocatable) in gfc_maybe_dereference_var()
2809 && !(sym->attr.codimension && sym->attr.allocatable) in gfc_maybe_dereference_var()
2813 && CLASS_DATA (sym)->attr.allocatable)))) in gfc_maybe_dereference_var()
2826 && (sym->attr.pointer || sym->attr.allocatable in gfc_maybe_dereference_var()
2833 && (!sym->attr.codimension || !sym->attr.allocatable)))) in gfc_maybe_dereference_var()
2842 || CLASS_DATA (sym)->attr.allocatable in gfc_maybe_dereference_var()
2857 || !CLASS_DATA (sym)->attr.allocatable) in gfc_maybe_dereference_var()
3014 && !CLASS_DATA (sym)->attr.allocatable in gfc_conv_variable()
4330 new_sym->attr.allocatable = sym->attr.allocatable; in gfc_add_interface_mapping()
4404 else if (!sym->attr.dimension || sym->attr.pointer || sym->attr.allocatable) in gfc_add_interface_mapping()
5416 else if (attr.allocatable) in gfc_conv_gfc_desc_to_cfi_desc()
5423 && !fsym->attr.pointer && !fsym->attr.allocatable) in gfc_conv_gfc_desc_to_cfi_desc()
5450 || gfc_expr_attr (e).allocatable)) in gfc_conv_gfc_desc_to_cfi_desc()
5696 && !(fsym->attr.pointer || fsym->attr.allocatable) in gfc_conv_procedure_call()
5763 gcc_assert (fsym->attr.optional && !fsym->attr.allocatable in gfc_conv_procedure_call()
5765 || !CLASS_DATA (fsym)->attr.allocatable)); in gfc_conv_procedure_call()
5782 || CLASS_DATA (fsym)->attr.allocatable); in gfc_conv_procedure_call()
5869 || CLASS_DATA (fsym)->attr.allocatable), in gfc_conv_procedure_call()
5874 || CLASS_DATA (fsym)->attr.allocatable); in gfc_conv_procedure_call()
6087 && !fsym->attr.allocatable in gfc_conv_procedure_call()
6095 && !e->symtree->n.sym->attr.allocatable in gfc_conv_procedure_call()
6125 && (fsym->attr.allocatable in gfc_conv_procedure_call()
6127 && CLASS_DATA (fsym)->attr.allocatable))) in gfc_conv_procedure_call()
6191 || CLASS_DATA (fsym)->attr.allocatable), in gfc_conv_procedure_call()
6196 || CLASS_DATA (fsym)->attr.allocatable); in gfc_conv_procedure_call()
6208 && CLASS_DATA (e)->attr.allocatable) in gfc_conv_procedure_call()
6264 || (fsym->attr.allocatable in gfc_conv_procedure_call()
6287 && CLASS_DATA (fsym)->attr.allocatable) in gfc_conv_procedure_call()
6331 || CLASS_DATA (fsym)->attr.allocatable), in gfc_conv_procedure_call()
6336 || CLASS_DATA (fsym)->attr.allocatable); in gfc_conv_procedure_call()
6446 || gfc_expr_attr (e).allocatable) in gfc_conv_procedure_call()
6465 if (fsym && fsym->attr.allocatable in gfc_conv_procedure_call()
6676 if (attr.allocatable in gfc_conv_procedure_call()
6677 && (fsym == NULL || !fsym->attr.allocatable)) in gfc_conv_procedure_call()
6710 if (attr.allocatable in gfc_conv_procedure_call()
6711 && (fsym == NULL || !fsym->attr.allocatable)) in gfc_conv_procedure_call()
6785 && !fsym->attr.allocatable) in gfc_conv_procedure_call()
6788 && !CLASS_DATA (fsym)->attr.allocatable))) in gfc_conv_procedure_call()
6797 && !fsym->attr.allocatable) in gfc_conv_procedure_call()
6800 && !CLASS_DATA (fsym)->attr.allocatable))) in gfc_conv_procedure_call()
7013 callee_alloc = comp->attr.allocatable || comp->attr.pointer; in gfc_conv_procedure_call()
7048 callee_alloc = sym->attr.allocatable || sym->attr.pointer; in gfc_conv_procedure_call()
7080 if ((!comp && (sym->attr.pointer || sym->attr.allocatable)) in gfc_conv_procedure_call()
7081 || (comp && (comp->attr.pointer || comp->attr.allocatable))) in gfc_conv_procedure_call()
7085 if ((!comp && sym->attr.allocatable) in gfc_conv_procedure_call()
7086 || (comp && comp->attr.allocatable)) in gfc_conv_procedure_call()
7180 && ((sym->attr.allocatable && !sym->attr.dimension && !comp) in gfc_conv_procedure_call()
7181 || (comp && comp->attr.allocatable && !comp->attr.dimension))) in gfc_conv_procedure_call()
7196 && ((!comp && (sym->attr.pointer || sym->attr.allocatable)) in gfc_conv_procedure_call()
7197 || (comp && (comp->attr.pointer || comp->attr.allocatable)))) in gfc_conv_procedure_call()
7245 if ((!comp && (sym->attr.pointer || sym->attr.allocatable)) in gfc_conv_procedure_call()
7246 || (comp && (comp->attr.pointer || comp->attr.allocatable))) in gfc_conv_procedure_call()
8063 && CLASS_DATA(cm)->attr.allocatable) in gfc_trans_alloc_subarray_assign()
8171 if (arg->symtree->n.sym->attr.allocatable in gfc_trans_alloc_subarray_assign()
8366 if (cm->attr.allocatable && expr->expr_type == EXPR_NULL) in gfc_trans_subcomponent_assign()
8368 else if (cm->attr.allocatable || cm->attr.pdt_array) in gfc_trans_subcomponent_assign()
8381 && CLASS_DATA (cm)->attr.allocatable in gfc_trans_subcomponent_assign()
8393 else if (init && cm->attr.allocatable && expr->expr_type == EXPR_NULL) in gfc_trans_subcomponent_assign()
8399 else if (init && (cm->attr.allocatable in gfc_trans_subcomponent_assign()
8400 || (cm->ts.type == BT_CLASS && CLASS_DATA (cm)->attr.allocatable in gfc_trans_subcomponent_assign()
8610 if (!c->expr && !cm->attr.allocatable) in gfc_trans_structure_assign()
8618 && (cm->attr.allocatable || cm->attr.pointer) in gfc_trans_structure_assign()
8766 if (!c->expr || (cm->attr.allocatable && cm->attr.flavor != FL_PROCEDURE)) in gfc_conv_structure()
10033 || expr2->value.function.esym->attr.allocatable) in arrayfunc_assign_needs_temporary()
10035 || expr2->symtree->n.sym->attr.allocatable); in arrayfunc_assign_needs_temporary()
10084 return (flag_realloc_lhs && sym->attr.allocatable && sym->attr.target) in arrayfunc_assign_needs_temporary()
10348 && expr2->value.function.esym->result->attr.allocatable)) in gfc_trans_arrayfunc_assign()
10619 if (expr->symtree->n.sym->attr.allocatable in is_scalar_reallocatable_lhs()
10634 && ref->u.c.component->attr.allocatable) in is_scalar_reallocatable_lhs()
10963 && !rhs->ts.u.derived->attr.allocatable) in trans_class_assignment()
10966 && !CLASS_DATA (rhs)->attr.allocatable)) in trans_class_assignment()
10977 && !lhs->ts.u.derived->attr.allocatable) in trans_class_assignment()
10980 && !CLASS_DATA (lhs)->attr.allocatable)) in trans_class_assignment()
11085 || (lhs_attr.allocatable && !lhs_attr.dimension)) in gfc_trans_assignment_1()
11204 && gfc_expr_attr (expr1).allocatable in gfc_trans_assignment_1()
11224 && gfc_expr_attr (expr1).allocatable in gfc_trans_assignment_1()
11341 use_vptr_copy || (lhs_attr.allocatable in gfc_trans_assignment_1()
11359 && ((lhs_caf_attr.allocatable && lhs_refs_comp) in gfc_trans_assignment_1()
11360 || (rhs_caf_attr.allocatable && rhs_refs_comp))) in gfc_trans_assignment_1()