| /netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/ |
| H A D | trans-decl.c | 676 if (sym->attr.use_assoc || sym->attr.used_in_submodule) in gfc_finish_var_decl()
711 if (!sym->attr.use_assoc in gfc_finish_var_decl()
721 if (!sym->attr.use_assoc in gfc_finish_var_decl()
999 if (sym->module && (sym->attr.use_assoc in gfc_build_qualified_array()
1007 if (sym->attr.use_assoc) in gfc_build_qualified_array()
1030 if (sym->module && !sym->attr.use_assoc) in gfc_build_qualified_array()
1512 || sym->attr.use_assoc in gfc_get_symbol_decl()
1540 && !(sym->attr.use_assoc || sym->attr.dummy)) in gfc_get_symbol_decl()
1712 if (sym->attr.use_assoc && sym->attr.flavor == FL_PARAMETER in gfc_get_symbol_decl()
1721 && (sym->attr.use_assoc || sym->attr.used_in_submodule) in gfc_get_symbol_decl()
[all …]
|
| H A D | symbol.c | 423 *use_assoc = "USE ASSOCIATED", *cray_pointer = "CRAY POINTER", in gfc_check_conflict() local
548 conf (use_assoc, automatic); in gfc_check_conflict()
579 conf (in_equivalence, use_assoc); in gfc_check_conflict()
958 if (attr->use_assoc == 0) in check_used()
1881 || (attr->use_assoc && attr->access != ACCESS_PRIVATE)) in gfc_add_access()
2003 if (sym->attr.use_assoc) in gfc_add_type()
2532 if (p && sym->attr.use_assoc && !noaccess) in gfc_find_component()
4241 if (sym->attr.use_assoc) in save_symbol()
4828 tmp_sym->attr.use_assoc = 1; in generate_isocbinding_symbol()
4943 dt_sym->attr.use_assoc = 1; in generate_isocbinding_symbol()
|
| H A D | trans-common.c | 724 if (s->sym->attr.use_assoc) in create_common()
981 dummy_symbol->use_assoc |= attr.use_assoc; in accumulate_equivalence_attributes()
|
| H A D | resolve.c | 945 if (!csym->attr.use_assoc) in resolve_common_vars()
2018 if (sym->attr.contained && !sym->attr.use_assoc in resolve_actual_arglist()
2994 && !sym->attr.use_assoc in is_external_proc()
3395 && expr->value.function.esym->attr.use_assoc) in resolve_function()
5899 || sym->attr.use_assoc in resolve_variable()
7436 if (sym->attr.use_assoc && sym->attr.private_comp) in derived_inaccessible()
12756 if (!sym->attr.class_ok && !sym->attr.use_assoc && !sym->assoc) in resolve_fl_var_and_proc()
12782 && !sym->ts.u.derived->attr.use_assoc in resolve_fl_variable_derived()
12873 && !sym->attr.use_assoc in resolve_fl_variable()
12922 if (!sym->attr.use_assoc && sym->ns->proc_name in resolve_fl_variable()
[all …]
|
| H A D | module.c | 4699 sym->attr.use_assoc = 1; in load_generic_interfaces()
4738 if (sym->attr.use_assoc in load_generic_interfaces()
4786 p->use_assoc = 1; in load_commons()
5049 sym->attr.use_assoc = 1; in load_needed()
5637 if (this_module && p->use_assoc) in write_common_0()
6419 sym->attr.use_assoc = 1; in create_intrinsic_function()
6721 sym->attr.use_assoc = 1; in create_int_parameter()
6753 sym->attr.use_assoc = 1; in create_int_parameter_array()
6804 dt_sym->attr.use_assoc = 1; in create_derived_type()
|
| H A D | expr.c | 3475 || sym->attr.use_assoc in check_restricted()
3676 if (sym->attr.use_assoc) in gfc_check_assign()
3891 if (lhs_attr.flavor == FL_PROCEDURE && lhs_attr.use_assoc in gfc_check_pointer_assign()
4444 if (attr.is_protected && attr.use_assoc in gfc_check_pointer_assign()
4483 && !rvalue->symtree->n.sym->attr.use_assoc in gfc_check_pointer_assign()
4495 || lvalue->symtree->n.sym->attr.use_assoc in gfc_check_pointer_assign()
6315 if (sym->attr.is_protected && sym->attr.use_assoc && check_intentin) in gfc_check_vardef_context()
|
| H A D | gfortran.h | 799 use_assoc:1, /* Symbol has been use-associated. */ member
1677 char use_assoc, saved, threadprivate; member
|
| H A D | class.c | 2305 if ((derived->attr.use_assoc || derived->attr.used_in_submodule) in gfc_find_derived_vtab()
2966 if (!noaccess && derived->attr.use_assoc in find_typebound_proc_uop()
3040 if (!noaccess && derived->attr.use_assoc in gfc_find_typebound_intrinsic_op()
|
| H A D | parse.c | 5669 || old_sym->attr.use_assoc in gfc_fixup_sibling_symbols()
6082 sym->attr.use_assoc = 0; in set_syms_host_assoc()
6105 sym->attr.use_assoc = 1; in set_syms_host_assoc()
|
| H A D | interface.c | 1975 else if (!p->sym->attr.use_assoc && q->sym->attr.use_assoc) in check_interface1()
2029 sym->attr.referenced || !sym->attr.use_assoc); in check_sym_interfaces()
|
| H A D | primary.c | 2247 && (tgt_expr->symtree->n.sym->attr.use_assoc in gfc_match_varspec()
3436 && !(*sym)->attr.use_assoc) in check_for_implicit_index()
|
| H A D | trans-types.c | 2562 && derived->attr.use_assoc in gfc_get_derived_type()
2569 if (derived->backend_decl == NULL && !derived->attr.use_assoc in gfc_get_derived_type()
|
| /netbsd-src/external/gpl3/gcc/dist/gcc/fortran/ |
| H A D | trans-decl.cc | 681 if (sym->attr.use_assoc || sym->attr.used_in_submodule) in gfc_finish_var_decl()
716 if (!sym->attr.use_assoc in gfc_finish_var_decl()
726 if (!sym->attr.use_assoc in gfc_finish_var_decl()
1004 if (sym->module && (sym->attr.use_assoc in gfc_build_qualified_array()
1012 if (sym->attr.use_assoc) in gfc_build_qualified_array()
1035 if (sym->module && !sym->attr.use_assoc) in gfc_build_qualified_array()
1546 || sym->attr.use_assoc in gfc_get_symbol_decl()
1582 && !(sym->attr.use_assoc || sym->attr.dummy)) in gfc_get_symbol_decl()
1751 if (sym->attr.use_assoc && sym->attr.flavor == FL_PARAMETER in gfc_get_symbol_decl()
1760 && (sym->attr.use_assoc || sym->attr.used_in_submodule) in gfc_get_symbol_decl()
[all …]
|
| H A D | symbol.cc | 423 *use_assoc = "USE ASSOCIATED", *cray_pointer = "CRAY POINTER", in gfc_check_conflict() local
548 conf (use_assoc, automatic); in gfc_check_conflict()
579 conf (in_equivalence, use_assoc); in gfc_check_conflict()
959 if (attr->use_assoc == 0) in check_used()
1888 || (attr->use_assoc && attr->access != ACCESS_PRIVATE)) in gfc_add_access()
2010 if (sym->attr.use_assoc) in gfc_add_type()
2539 if (p && sym->attr.use_assoc && !noaccess) in gfc_find_component()
4261 if (sym->attr.use_assoc) in save_symbol()
4872 tmp_sym->attr.use_assoc = 1; in generate_isocbinding_symbol()
4987 dt_sym->attr.use_assoc = 1; in generate_isocbinding_symbol()
|
| H A D | trans-common.cc | 752 if (s->sym->attr.use_assoc) in create_common()
1010 dummy_symbol->use_assoc |= attr.use_assoc; in accumulate_equivalence_attributes()
|
| H A D | resolve.cc | 969 if (!csym->attr.use_assoc && !csym->attr.used_in_submodule) in resolve_common_vars()
2059 if (sym->attr.contained && !sym->attr.use_assoc in resolve_actual_arglist()
3066 && !sym->attr.use_assoc in is_external_proc()
3467 && expr->value.function.esym->attr.use_assoc) in resolve_function()
5983 || sym->attr.use_assoc in resolve_variable()
7558 if (sym->attr.use_assoc && sym->attr.private_comp) in derived_inaccessible()
11374 tmp->n.sym->attr.use_assoc = 0; in get_temp_from_expr()
12967 if (!sym->attr.class_ok && !sym->attr.use_assoc && !sym->assoc) in resolve_fl_var_and_proc()
12993 && !sym->ts.u.derived->attr.use_assoc in resolve_fl_variable_derived()
13086 && !sym->attr.use_assoc in resolve_fl_variable()
[all …]
|
| H A D | module.cc | 4850 sym->attr.use_assoc = 1; in load_generic_interfaces()
4889 if (sym->attr.use_assoc in load_generic_interfaces()
4938 p->use_assoc = 1; in load_commons()
5201 sym->attr.use_assoc = 1; in load_needed()
5847 if (this_module && p->use_assoc) in write_common_0()
6630 sym->attr.use_assoc = 1; in create_intrinsic_function()
6932 sym->attr.use_assoc = 1; in create_int_parameter()
6964 sym->attr.use_assoc = 1; in create_int_parameter_array()
7015 dt_sym->attr.use_assoc = 1; in create_derived_type()
|
| H A D | expr.cc | 3507 || sym->attr.use_assoc in check_restricted()
3708 if (sym->attr.use_assoc) in gfc_check_assign()
3923 if (lhs_attr.flavor == FL_PROCEDURE && lhs_attr.use_assoc in gfc_check_pointer_assign()
4476 if (attr.is_protected && attr.use_assoc in gfc_check_pointer_assign()
4523 && !rvalue->symtree->n.sym->attr.use_assoc in gfc_check_pointer_assign()
4535 || lvalue->symtree->n.sym->attr.use_assoc in gfc_check_pointer_assign()
6381 if (sym->attr.is_protected && sym->attr.use_assoc && check_intentin) in gfc_check_vardef_context()
|
| H A D | class.cc | 2313 if ((derived->attr.use_assoc || derived->attr.used_in_submodule) in gfc_find_derived_vtab()
2980 if (!noaccess && derived->attr.use_assoc in find_typebound_proc_uop()
3054 if (!noaccess && derived->attr.use_assoc in gfc_find_typebound_intrinsic_op()
|
| H A D | gfortran.h | 871 use_assoc:1, /* Symbol has been use-associated. */ member
1931 char use_assoc, saved, threadprivate; member
|
| H A D | parse.cc | 6011 || old_sym->attr.use_assoc in gfc_fixup_sibling_symbols()
6424 sym->attr.use_assoc = 0; in set_syms_host_assoc()
6447 sym->attr.use_assoc = 1; in set_syms_host_assoc()
|
| H A D | primary.cc | 2235 && (tgt_expr->symtree->n.sym->attr.use_assoc in gfc_match_varspec()
3444 && !(*sym)->attr.use_assoc) in check_for_implicit_index()
|
| H A D | interface.cc | 1995 else if (!p->sym->attr.use_assoc && q->sym->attr.use_assoc) in check_interface1()
2049 sym->attr.referenced || !sym->attr.use_assoc); in check_sym_interfaces()
|
| H A D | trans-types.cc | 2630 && (derived->attr.use_assoc || derived->attr.used_in_submodule) in gfc_get_derived_type()
2638 && !derived->attr.use_assoc in gfc_get_derived_type()
|
| H A D | match.cc | 5345 if (sym->attr.use_assoc) in gfc_match_common()
5580 && group_name->attr.use_assoc in gfc_match_namelist()
|