Searched refs:pdt_string (Results 1 – 22 of 22) sorted by relevance
2478 if (!c->attr.pointer && !c->attr.pdt_string) in transfer_expr()2482 if (c->attr.pdt_string in transfer_expr()2497 if (c->attr.pdt_string && strlen) in transfer_expr()
2725 && !c->ts.deferred && !c->attr.pdt_string) in gfc_get_derived_type()2763 else if ((c->attr.pointer || c->attr.allocatable || c->attr.pdt_string) in gfc_get_derived_type()
2386 && (c->ts.deferred || c->attr.pdt_string))) in gfc_deferred_strlen()
913 pdt_array:1, pdt_string:1; member
2342 if (attr->pdt_string) in mio_symbol_attribute()2577 attr->pdt_string = 1; in mio_symbol_attribute()
868 if (attr->pdt_string) in show_attr()
9676 if (c->attr.pdt_string) in structure_alloc_comps()9831 && !c->attr.pdt_string in structure_alloc_comps()9863 else if (c->attr.pdt_string) in structure_alloc_comps()
3987 c2->attr.pdt_string = 1; in gfc_get_pdt_instance()4048 c2->attr.pdt_array = pdt_array ? 1 : c2->attr.pdt_string; in gfc_get_pdt_instance()
2683 && !c->attr.pdt_string) in gfc_conv_component_ref()
14682 && (c->ts.deferred || c->attr.pdt_string) in resolve_component()
2503 if (!c->attr.pointer && !c->attr.pdt_string) in transfer_expr()2507 if (c->attr.pdt_string in transfer_expr()2522 if (c->attr.pdt_string && strlen) in transfer_expr()
2795 && !c->ts.deferred && !c->attr.pdt_string) in gfc_get_derived_type()2833 else if ((c->attr.pointer || c->attr.allocatable || c->attr.pdt_string) in gfc_get_derived_type()
2478 && (c->ts.deferred || c->attr.pdt_string))) in gfc_deferred_strlen()
2405 if (attr->pdt_string) in mio_symbol_attribute()2677 attr->pdt_string = 1; in mio_symbol_attribute()
985 pdt_array:1, pdt_string:1; member
893 if (attr->pdt_string) in show_attr()
54 * expr.cc (find_inquiry_ref): Replace len of pdt_string by
9877 if (c->attr.pdt_string) in structure_alloc_comps()10032 && !c->attr.pdt_string in structure_alloc_comps()10064 else if (c->attr.pdt_string) in structure_alloc_comps()
4092 c2->attr.pdt_string = 1; in gfc_get_pdt_instance()4153 c2->attr.pdt_array = pdt_array ? 1 : c2->attr.pdt_string; in gfc_get_pdt_instance()
4542 && e->ref->u.c.component->attr.pdt_string in gfc_simplify_len()
2777 && !c->attr.pdt_string) in gfc_conv_component_ref()
14895 && (c->ts.deferred || c->attr.pdt_string) in resolve_component()