/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/ |
H A D | primary.c | 2857 attr.pointer_comp = CLASS_DATA (sym)->ts.u.derived->attr.pointer_comp; in caf_variable_attr() 2867 attr.pointer_comp = sym->ts.type == BT_DERIVED in caf_variable_attr() 2868 ? sym->ts.u.derived->attr.pointer_comp : 0; in caf_variable_attr() 2978 attr.pointer_comp = CLASS_DATA (sym)->ts.u.derived in gfc_caf_attr() 2979 ->attr.pointer_comp; in gfc_caf_attr()
|
H A D | expr.c | 5879 return CLASS_DATA (last->u.c.component)->attr.pointer_comp; in gfc_has_ultimate_pointer() 5881 return last->u.c.component->ts.u.derived->attr.pointer_comp; in gfc_has_ultimate_pointer() 5886 return CLASS_DATA (e)->attr.pointer_comp; in gfc_has_ultimate_pointer() 5888 return e->ts.u.derived->attr.pointer_comp; in gfc_has_ultimate_pointer()
|
H A D | trans-types.c | 2972 || f->sym->ts.u.derived->attr.pointer_comp)) in create_fn_spec() 2975 || CLASS_DATA (f->sym)->ts.u.derived->attr.pointer_comp)) in create_fn_spec()
|
H A D | parse.c | 2996 || (c->ts.type == BT_DERIVED && c->ts.u.derived->attr.pointer_comp)) in check_component() 2999 sym->attr.pointer_comp = 1; in check_component()
|
H A D | resolve.c | 9969 if (ts->u.derived->attr.pointer_comp && dtio_sub == NULL) in resolve_transfer() 10972 && lhs->ts.u.derived->attr.pointer_comp in resolve_ordinary_assign() 11012 && lhs->ts.u.derived->attr.pointer_comp in resolve_ordinary_assign() 15085 || nl->sym->ts.u.derived->attr.pointer_comp)) in resolve_fl_namelist() 15298 || CLASS_DATA (sym)->ts.u.derived->attr.pointer_comp)) in resolve_symbol() 16073 || sym->ts.u.derived->attr.pointer_comp)) in resolve_symbol() 16079 || sym->ts.u.derived->attr.pointer_comp)) in resolve_symbol()
|
H A D | trans-decl.c | 5722 else if (sym->ts.type == BT_DERIVED && sym->ts.u.derived->attr.pointer_comp) in generate_coarray_sym_init() 6885 || sym->result->ts.u.derived->attr.pointer_comp)) in gfc_generate_function_code() 6890 || CLASS_DATA (sym->result)->attr.pointer_comp)))) in gfc_generate_function_code()
|
H A D | gfortran.h | 901 unsigned alloc_comp:1, pointer_comp:1, proc_pointer_comp:1, member
|
H A D | trans-stmt.c | 3926 && (lsym->ts.u.derived->attr.pointer_comp in check_forall_dependencies() 7051 && code->ext.alloc.ts.u.derived->attr.pointer_comp) in gfc_trans_allocate() 7058 && expr->ts.u.derived->attr.pointer_comp) in gfc_trans_allocate()
|
H A D | trans-intrinsic.c | 1706 if (caf_attr->alloc_comp || caf_attr->pointer_comp || may_realloc) in gfc_conv_intrinsic_caf_get() 1966 else if ((lhs_caf_attr.alloc_comp || lhs_caf_attr.pointer_comp) in conv_caf_send() 2179 else if ((rhs_caf_attr.alloc_comp || rhs_caf_attr.pointer_comp) in conv_caf_send() 2260 if (lhs_caf_attr.alloc_comp || lhs_caf_attr.pointer_comp) in conv_caf_send() 2297 if (rhs_caf_attr.alloc_comp || rhs_caf_attr.pointer_comp) in conv_caf_send()
|
H A D | module.c | 2290 if (attr->pointer_comp) in mio_symbol_attribute() 2508 attr->pointer_comp = 1; in mio_symbol_attribute()
|
H A D | dump-parse-tree.c | 834 if (attr->pointer_comp) in show_attr()
|
H A D | io.c | 3429 || n->sym->ts.u.derived->attr.pointer_comp)) in gfc_resolve_dt()
|
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/ |
H A D | primary.cc | 2865 attr.pointer_comp = CLASS_DATA (sym)->ts.u.derived->attr.pointer_comp; in caf_variable_attr() 2875 attr.pointer_comp = sym->ts.type == BT_DERIVED in caf_variable_attr() 2876 ? sym->ts.u.derived->attr.pointer_comp : 0; in caf_variable_attr() 2986 attr.pointer_comp = CLASS_DATA (sym)->ts.u.derived in gfc_caf_attr() 2987 ->attr.pointer_comp; in gfc_caf_attr()
|
H A D | expr.cc | 5919 return CLASS_DATA (last->u.c.component)->attr.pointer_comp; in gfc_has_ultimate_pointer() 5921 return last->u.c.component->ts.u.derived->attr.pointer_comp; in gfc_has_ultimate_pointer() 5926 return CLASS_DATA (e)->attr.pointer_comp; in gfc_has_ultimate_pointer() 5928 return e->ts.u.derived->attr.pointer_comp; in gfc_has_ultimate_pointer()
|
H A D | trans-types.cc | 3060 || f->sym->ts.u.derived->attr.pointer_comp)) in create_fn_spec() 3063 || CLASS_DATA (f->sym)->ts.u.derived->attr.pointer_comp)) in create_fn_spec()
|
H A D | parse.cc | 3246 || (c->ts.type == BT_DERIVED && c->ts.u.derived->attr.pointer_comp)) in check_component() 3249 sym->attr.pointer_comp = 1; in check_component()
|
H A D | resolve.cc | 10108 if (ts->u.derived->attr.pointer_comp && dtio_sub == NULL) in resolve_transfer() 11129 && lhs->ts.u.derived->attr.pointer_comp in resolve_ordinary_assign() 11169 && lhs->ts.u.derived->attr.pointer_comp in resolve_ordinary_assign() 15305 || nl->sym->ts.u.derived->attr.pointer_comp)) in resolve_fl_namelist() 15518 || CLASS_DATA (sym)->ts.u.derived->attr.pointer_comp)) in resolve_symbol() 16299 || sym->ts.u.derived->attr.pointer_comp)) in resolve_symbol() 16306 || sym->ts.u.derived->attr.pointer_comp)) in resolve_symbol()
|
H A D | trans-stmt.cc | 3962 && (lsym->ts.u.derived->attr.pointer_comp in check_forall_dependencies() 7084 && code->ext.alloc.ts.u.derived->attr.pointer_comp) in gfc_trans_allocate() 7091 && expr->ts.u.derived->attr.pointer_comp) in gfc_trans_allocate()
|
H A D | module.cc | 2353 if (attr->pointer_comp) in mio_symbol_attribute() 2608 attr->pointer_comp = 1; in mio_symbol_attribute()
|
H A D | ChangeLog-2017 | 2223 ones. Add setting of pointer_comp attribute. 2224 (gfc_caf_attr): Add setting of pointer_comp attribute.
|
H A D | trans-decl.cc | 5650 else if (sym->ts.type == BT_DERIVED && sym->ts.u.derived->attr.pointer_comp) in generate_coarray_sym_init() 7684 || sym->result->ts.u.derived->attr.pointer_comp)) in gfc_generate_function_code() 7689 || CLASS_DATA (sym->result)->attr.pointer_comp)))) in gfc_generate_function_code()
|
H A D | gfortran.h | 973 unsigned alloc_comp:1, pointer_comp:1, proc_pointer_comp:1, member
|
H A D | trans-intrinsic.cc | 1714 if (caf_attr->alloc_comp || caf_attr->pointer_comp || may_realloc) in gfc_conv_intrinsic_caf_get() 1974 else if ((lhs_caf_attr.alloc_comp || lhs_caf_attr.pointer_comp) in conv_caf_send() 2187 else if ((rhs_caf_attr.alloc_comp || rhs_caf_attr.pointer_comp) in conv_caf_send() 2268 if (lhs_caf_attr.alloc_comp || lhs_caf_attr.pointer_comp) in conv_caf_send() 2305 if (rhs_caf_attr.alloc_comp || rhs_caf_attr.pointer_comp) in conv_caf_send()
|
H A D | dump-parse-tree.cc | 859 if (attr->pointer_comp) in show_attr()
|
H A D | io.cc | 3429 || n->sym->ts.u.derived->attr.pointer_comp)) in gfc_resolve_dt()
|