Home
last modified time | relevance | path

Searched refs:IFSRC_IFBODY (Results 1 – 25 of 33) sorted by relevance

12

/netbsd/external/gpl3/gcc/dist/gcc/fortran/
H A Dsymbol.c80 minit ("BODY", IFSRC_IFBODY)
1023 if (attr->flavor == FL_PROCEDURE && attr->if_source == IFSRC_IFBODY in gfc_add_allocatable()
1064 if (attr->flavor == FL_PROCEDURE && attr->if_source == IFSRC_IFBODY in gfc_add_codimension()
1090 if (attr->flavor == FL_PROCEDURE && attr->if_source == IFSRC_IFBODY in gfc_add_dimension()
1128 if (attr->pointer && attr->if_source != IFSRC_IFBODY) in gfc_add_external()
1210 if (attr->pointer && !(attr->if_source == IFSRC_IFBODY in gfc_add_pointer()
1218 if (attr->procedure || (attr->external && attr->if_source != IFSRC_IFBODY) in gfc_add_pointer()
1219 || (attr->if_source == IFSRC_IFBODY in gfc_add_pointer()
1964 if (source == IFSRC_IFBODY && (sym->attr.dimension || sym->attr.allocatable)) in gfc_add_explicit_interface()
3238 && ns->proc_name && ns->proc_name->attr.if_source == IFSRC_IFBODY) in gfc_find_sym_tree()
[all …]
H A Dsymbol.cc80 minit ("BODY", IFSRC_IFBODY)
1024 if (attr->flavor == FL_PROCEDURE && attr->if_source == IFSRC_IFBODY in gfc_add_allocatable()
1065 if (attr->flavor == FL_PROCEDURE && attr->if_source == IFSRC_IFBODY in gfc_add_codimension()
1091 if (attr->flavor == FL_PROCEDURE && attr->if_source == IFSRC_IFBODY in gfc_add_dimension()
1135 if (attr->pointer && attr->if_source != IFSRC_IFBODY) in gfc_add_external()
1217 if (attr->pointer && !(attr->if_source == IFSRC_IFBODY in gfc_add_pointer()
1225 if (attr->procedure || (attr->external && attr->if_source != IFSRC_IFBODY) in gfc_add_pointer()
1226 || (attr->if_source == IFSRC_IFBODY in gfc_add_pointer()
1971 if (source == IFSRC_IFBODY && (sym->attr.dimension || sym->attr.allocatable)) in gfc_add_explicit_interface()
3252 && ns->proc_name && ns->proc_name->attr.if_source == IFSRC_IFBODY) in gfc_find_sym_tree()
[all …]
H A Dresolve.cc1626 if (sym->attr.if_source == IFSRC_IFBODY in specific_sym()
2621 || sym->attr.if_source == IFSRC_IFBODY) in resolve_global_procedure()
2855 if (sym->attr.external || sym->attr.if_source == IFSRC_IFBODY) in resolve_specific_f0()
12558 gsym->defined = sym->attr.if_source != IFSRC_IFBODY; in gfc_verify_binding_labels()
12588 || (gsym->defined && sym->attr.if_source != IFSRC_IFBODY)) in gfc_verify_binding_labels()
12794 || sym->ns->proc_name->attr.if_source == IFSRC_IFBODY)) in can_generate_init()
12994 && sym->ns->proc_name->attr.if_source != IFSRC_IFBODY) in resolve_fl_variable_derived()
14256 && proc->attr.if_source != IFSRC_IFBODY in resolve_typebound_procedure()
16314 && sym->ns->proc_name->attr.if_source != IFSRC_IFBODY in resolve_symbol()
17340 || s->ns->proc_name->attr.if_source == IFSRC_IFBODY) in flag_fn_result_spec()
[all …]
H A Dresolve.c1587 if (sym->attr.if_source == IFSRC_IFBODY in specific_sym()
2563 || sym->attr.if_source == IFSRC_IFBODY) in resolve_global_procedure()
2796 if (sym->attr.external || sym->attr.if_source == IFSRC_IFBODY) in resolve_specific_f0()
3537 if (sym->attr.external || sym->attr.if_source == IFSRC_IFBODY) in resolve_specific_s0()
12348 gsym->defined = sym->attr.if_source != IFSRC_IFBODY; in gfc_verify_binding_labels()
12378 || (gsym->defined && sym->attr.if_source != IFSRC_IFBODY)) in gfc_verify_binding_labels()
12783 && sym->ns->proc_name->attr.if_source != IFSRC_IFBODY) in resolve_fl_variable_derived()
14044 && proc->attr.if_source != IFSRC_IFBODY) in resolve_typebound_procedure()
17105 || s->ns->proc_name->attr.if_source == IFSRC_IFBODY) in flag_fn_result_spec()
17302 && ns->proc_name->attr.if_source == IFSRC_IFBODY) in resolve_types()
H A Ddecl.c1329 if (sym->attr.module_procedure && sym->attr.if_source == IFSRC_IFBODY) in get_proc_name()
1421 && sym->attr.if_source == IFSRC_IFBODY in get_proc_name()
4926 || gfc_current_ns->proc_name->attr.if_source != IFSRC_IFBODY) in gfc_match_import()
7065 sym->attr.if_source = IFSRC_IFBODY; in match_procedure_decl()
7204 c->attr.if_source = IFSRC_IFBODY; in match_ppc_decl()
H A Ddecl.cc1329 if (sym->attr.module_procedure && sym->attr.if_source == IFSRC_IFBODY) in get_proc_name()
1421 && sym->attr.if_source == IFSRC_IFBODY in get_proc_name()
5023 || gfc_current_ns->proc_name->attr.if_source != IFSRC_IFBODY) in gfc_match_import()
7146 sym->attr.if_source = IFSRC_IFBODY; in match_procedure_decl()
7285 c->attr.if_source = IFSRC_IFBODY; in match_ppc_decl()
H A Dclass.c828 c->attr.if_source = IFSRC_IFBODY; in add_proc_comp()
1692 final->attr.if_source = expr_null_wrapper ? IFSRC_IFBODY : IFSRC_DECL; in generate_finalization_wrapper()
H A Dopenmp.c219 && ns->proc_name && ns->proc_name->attr.if_source == IFSRC_IFBODY) in gfc_find_omp_udr()
2393 && gfc_current_ns->proc_name->attr.if_source == IFSRC_IFBODY in gfc_match_oacc_routine()
3182 && gfc_current_ns->proc_name->attr.if_source == IFSRC_IFBODY) in gfc_match_omp_declare_target()
H A Dtrans-decl.c448 || sym->attr.if_source == IFSRC_IFBODY))) in gfc_sym_mangled_function_id()
1514 || sym->ns->proc_name->attr.if_source == IFSRC_IFBODY in gfc_get_symbol_decl()
6077 && sym->attr.if_source != IFSRC_IFBODY) in generate_local_decl()
H A Dfrontend-passes.cc5721 if (sym->attr.if_source == IFSRC_IFBODY || sym->attr.if_source == IFSRC_DECL) in check_externals_procedure()
5818 if (sym->attr.if_source != IFSRC_IFBODY || sym->attr.flavor != FL_PROCEDURE in check_against_globals()
H A Dopenmp.cc288 && ns->proc_name && ns->proc_name->attr.if_source == IFSRC_IFBODY) in gfc_find_omp_udr()
3430 && gfc_current_ns->proc_name->attr.if_source == IFSRC_IFBODY in gfc_match_oacc_routine()
4475 && gfc_current_ns->proc_name->attr.if_source == IFSRC_IFBODY) in gfc_match_omp_declare_target()
H A Dtrans-decl.cc445 || sym->attr.if_source == IFSRC_IFBODY))) in gfc_sym_mangled_function_id()
1548 || sym->ns->proc_name->attr.if_source == IFSRC_IFBODY in gfc_get_symbol_decl()
6005 && sym->attr.if_source != IFSRC_IFBODY) in generate_local_decl()
H A Dgfortran.h362 IFSRC_IFBODY /* INTERFACE statement or PROCEDURE statement enumerator
H A Dclass.cc843 c->attr.if_source = IFSRC_IFBODY; in add_proc_comp()
H A Dparse.c3536 if (!gfc_add_explicit_interface (gfc_new_block, IFSRC_IFBODY, in parse_interface()
H A Dparse.cc3782 if (!gfc_add_explicit_interface (gfc_new_block, IFSRC_IFBODY, in parse_interface()
H A Dfrontend-passes.c5428 if (sym->attr.if_source == IFSRC_IFBODY || sym->attr.if_source == IFSRC_DECL) in check_externals_procedure()
/netbsd/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dsymbol.c80 minit ("BODY", IFSRC_IFBODY)
1023 if (attr->flavor == FL_PROCEDURE && attr->if_source == IFSRC_IFBODY in gfc_add_allocatable()
1064 if (attr->flavor == FL_PROCEDURE && attr->if_source == IFSRC_IFBODY in gfc_add_codimension()
1090 if (attr->flavor == FL_PROCEDURE && attr->if_source == IFSRC_IFBODY in gfc_add_dimension()
1128 if (attr->pointer && attr->if_source != IFSRC_IFBODY) in gfc_add_external()
1210 if (attr->pointer && !(attr->if_source == IFSRC_IFBODY in gfc_add_pointer()
1218 if (attr->procedure || (attr->external && attr->if_source != IFSRC_IFBODY) in gfc_add_pointer()
1219 || (attr->if_source == IFSRC_IFBODY in gfc_add_pointer()
1964 if (source == IFSRC_IFBODY && (sym->attr.dimension || sym->attr.allocatable)) in gfc_add_explicit_interface()
3238 && ns->proc_name && ns->proc_name->attr.if_source == IFSRC_IFBODY) in gfc_find_sym_tree()
[all …]
H A Dresolve.c1587 if (sym->attr.if_source == IFSRC_IFBODY in specific_sym()
2563 || sym->attr.if_source == IFSRC_IFBODY) in resolve_global_procedure()
2796 if (sym->attr.external || sym->attr.if_source == IFSRC_IFBODY) in resolve_specific_f0()
3537 if (sym->attr.external || sym->attr.if_source == IFSRC_IFBODY) in resolve_specific_s0()
12348 gsym->defined = sym->attr.if_source != IFSRC_IFBODY; in gfc_verify_binding_labels()
12378 || (gsym->defined && sym->attr.if_source != IFSRC_IFBODY)) in gfc_verify_binding_labels()
12783 && sym->ns->proc_name->attr.if_source != IFSRC_IFBODY) in resolve_fl_variable_derived()
14044 && proc->attr.if_source != IFSRC_IFBODY) in resolve_typebound_procedure()
17105 || s->ns->proc_name->attr.if_source == IFSRC_IFBODY) in flag_fn_result_spec()
17302 && ns->proc_name->attr.if_source == IFSRC_IFBODY) in resolve_types()
H A Ddecl.c1329 if (sym->attr.module_procedure && sym->attr.if_source == IFSRC_IFBODY) in get_proc_name()
1421 && sym->attr.if_source == IFSRC_IFBODY in get_proc_name()
4926 || gfc_current_ns->proc_name->attr.if_source != IFSRC_IFBODY) in gfc_match_import()
7065 sym->attr.if_source = IFSRC_IFBODY; in match_procedure_decl()
7204 c->attr.if_source = IFSRC_IFBODY; in match_ppc_decl()
H A Dclass.c828 c->attr.if_source = IFSRC_IFBODY; in add_proc_comp()
1692 final->attr.if_source = expr_null_wrapper ? IFSRC_IFBODY : IFSRC_DECL; in generate_finalization_wrapper()
H A Dopenmp.c219 && ns->proc_name && ns->proc_name->attr.if_source == IFSRC_IFBODY) in gfc_find_omp_udr()
2393 && gfc_current_ns->proc_name->attr.if_source == IFSRC_IFBODY in gfc_match_oacc_routine()
3182 && gfc_current_ns->proc_name->attr.if_source == IFSRC_IFBODY) in gfc_match_omp_declare_target()
H A Dtrans-decl.c448 || sym->attr.if_source == IFSRC_IFBODY))) in gfc_sym_mangled_function_id()
1514 || sym->ns->proc_name->attr.if_source == IFSRC_IFBODY in gfc_get_symbol_decl()
6077 && sym->attr.if_source != IFSRC_IFBODY) in generate_local_decl()
H A Dgfortran.h312 IFSRC_IFBODY /* INTERFACE statement or PROCEDURE statement enumerator
H A Dparse.c3536 if (!gfc_add_explicit_interface (gfc_new_block, IFSRC_IFBODY, in parse_interface()

12