Home
last modified time | relevance | path

Searched refs:proc_name (Results 1 – 25 of 82) sorted by relevance

1234

/netbsd-src/usr.bin/rpcgen/
H A Drpc_sample.c108 pvname(proc->proc_name, vp->vers_num); in write_sample_client()
115 pvname(proc->proc_name, vp->vers_num); in write_sample_client()
130 pvname(proc->proc_name, vp->vers_num); in write_sample_client()
148 pvname(proc->proc_name, vp->vers_num); in write_sample_client()
151 pvname(proc->proc_name, vp->vers_num); in write_sample_client()
157 pvname(proc->proc_name, vp->vers_num); in write_sample_client()
165 pvname(proc->proc_name, vp->vers_num); in write_sample_client()
172 pvname(proc->proc_name, vp->vers_num); in write_sample_client()
177 pvname(proc->proc_name, vp->vers_num); in write_sample_client()
202 pvname_svc(proc->proc_name, vp->vers_num); in write_sample_server()
H A Drpc_clntout.c98 pvname(proc->proc_name, vp->vers_num); in write_program()
203 proc->proc_name); in printbody()
208 proc->proc_name); in printbody()
225 proc->proc_name, proc->args.argname, in printbody()
230 proc->proc_name, proc->args.argname, in printbody()
238 proc->proc_name, in printbody()
246 proc->proc_name, in printbody()
H A Drpc_svcout.c304 pvname(proc->proc_name, vp->vers_num); in write_real_program()
326 pvname_svc(proc->proc_name, vp->vers_num); in write_real_program()
390 pvname(proc->proc_name, vp->vers_num); in write_program()
397 pvname(proc->proc_name, vp->vers_num); in write_program()
414 pvname(proc->proc_name, vp->vers_num); in write_program()
447 f_print(fout, "\tcase %s:\n", proc->proc_name); in write_program()
465 pvname(proc->proc_name, vp->vers_num); in write_program()
467 pvname_svc(proc->proc_name, vp->vers_num); in write_program()
H A Drpc_hout.c280 if (streq(proc->proc_name, stop->proc_name)) { in define_printed()
327 puldefine(proc->proc_name, proc->proc_num); in pprogramdef()
363 pvname_svc(proc->proc_name, vp->vers_num); in pprocdef()
365 pvname(proc->proc_name, vp->vers_num); in pprocdef()
H A Drpc_tblout.c132 pvname_svc(proc->proc_name, vp->vers_num); in write_table()
136 pvname(proc->proc_name, vp->vers_num); in write_table()
/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dtrans-decl.c373 gfc_symbol *proc = sym->ns->proc_name; in mangled_identifier()
640 if (sym->ns->proc_name in gfc_finish_var_decl()
641 && (sym->ns->proc_name->backend_decl == current_function_decl in gfc_finish_var_decl()
644 else if (sym->ns->proc_name in gfc_finish_var_decl()
645 && sym->ns->proc_name->attr.flavor == FL_LABEL) in gfc_finish_var_decl()
681 else if (sym->fn_result_spec && !sym->ns->proc_name->module) in gfc_finish_var_decl()
684 if (sym->ns->proc_name->attr.if_source != IFSRC_DECL) in gfc_finish_var_decl()
713 || (sym->value && sym->ns->proc_name->attr.is_main_program) in gfc_finish_var_decl()
738 if (!(sym->ns->proc_name && sym->ns->proc_name->attr.recursive) in gfc_finish_var_decl()
754 && !(sym->ns->proc_name in gfc_finish_var_decl()
[all …]
H A Dparse.c2527 ns->proc_name = main_program; in main_program_symbol()
2547 gfc_current_ns->proc_name = gfc_new_block; in accept_statement()
3595 if (prog_unit == prog_unit->formal_ns->proc_name in parse_interface()
3635 && current_interface.ns->proc_name in parse_interface()
3636 && strcmp (current_interface.ns->proc_name->name, in parse_interface()
3640 &current_interface.ns->proc_name->declared_at); in parse_interface()
3712 if (!gfc_current_ns->proc_name->result) in check_function_result_typed()
3715 ts = gfc_current_ns->proc_name->result->ts; in check_function_result_typed()
3755 gfc_symbol* proc = gfc_current_ns->proc_name; in parse_spec()
4587 my_ns->proc_name = gfc_new_block; in gfc_build_block_ns()
[all …]
H A Dresolve.c574 && sym->ns->parent->proc_name in resolve_contained_fntype()
575 && sym->ns->parent->proc_name->attr.flavor == FL_PROCEDURE in resolve_contained_fntype()
576 && !strcmp (sym->name, sym->ns->parent->proc_name->name)) in resolve_contained_fntype()
622 gcc_assert (ns->parent && ns->parent->proc_name); in resolve_contained_fntype()
623 module_proc = (ns->parent->proc_name->attr.flavor == FL_MODULE); in resolve_contained_fntype()
708 if (ns->proc_name == NULL) in resolve_entries()
717 if (ns->proc_name->attr.entry_master) in resolve_entries()
721 gcc_assert (ns->proc_name->attr.flavor == FL_PROCEDURE); in resolve_entries()
730 el->sym = ns->proc_name; in resolve_entries()
734 ns->proc_name->attr.entry = 1; in resolve_entries()
[all …]
H A Dopenmp.c219 && ns->proc_name && ns->proc_name->attr.if_source == IFSRC_IFBODY) in gfc_find_omp_udr()
1690 || sym == sym->ns->proc_name)
2159 if (gfc_current_ns->proc_name in gfc_match_oacc_declare()
2160 && gfc_current_ns->proc_name->attr.flavor == FL_MODULE) in gfc_match_oacc_declare()
2392 if (gfc_current_ns->proc_name in gfc_match_oacc_routine()
2393 && gfc_current_ns->proc_name->attr.if_source == IFSRC_IFBODY in gfc_match_oacc_routine()
2423 if (gfc_current_ns->proc_name != NULL in gfc_match_oacc_routine()
2424 && strcmp (sym->name, gfc_current_ns->proc_name->name) == 0) in gfc_match_oacc_routine()
2507 else if (gfc_current_ns->proc_name) in gfc_match_oacc_routine()
2511 oacc_routine_lop lop_p = gfc_current_ns->proc_name->attr.oacc_routine_lop; in gfc_match_oacc_routine()
[all …]
H A Ddecl.c601 gfc_unset_implicit_pure (gfc_current_ns->proc_name); in match_old_style_init()
752 gfc_unset_implicit_pure (gfc_current_ns->proc_name); in gfc_match_data()
1463 if (((sym->ns->proc_name != NULL in get_proc_name()
1464 && sym->ns->proc_name->attr.flavor == FL_MODULE in get_proc_name()
1526 if (sym->ns != NULL && sym->ns->proc_name != NULL) in gfc_verify_c_interop_param()
1528 if (sym->ns->proc_name->attr.is_bind_c == 1) in gfc_verify_c_interop_param()
1540 sym->ns->proc_name->name, in gfc_verify_c_interop_param()
1547 sym->ns->proc_name->name); in gfc_verify_c_interop_param()
1554 sym->ns->proc_name->name); in gfc_verify_c_interop_param()
1569 sym->ns->proc_name->name); in gfc_verify_c_interop_param()
[all …]
H A Dtrans-types.c2233 && sym->ns->proc_name in gfc_sym_type()
2234 && sym->ns->proc_name->ts.u.cl in gfc_sym_type()
2235 && sym->ns->proc_name->ts.u.cl->backend_decl != NULL_TREE) in gfc_sym_type()
2236 sym->ts.u.cl->backend_decl = sym->ns->proc_name->ts.u.cl->backend_decl; in gfc_sym_type()
2241 && sym->ns->proc_name in gfc_sym_type()
2242 && sym->ns->proc_name->attr.is_bind_c) in gfc_sym_type()
2303 || (sym->ns->proc_name && sym->ns->proc_name->attr.entry_master)) in gfc_sym_type()
2814 if (derived->module && derived->ns->proc_name in gfc_get_derived_type()
2815 && derived->ns->proc_name->attr.flavor == FL_MODULE) in gfc_get_derived_type()
2817 if (derived->ns->proc_name->backend_decl in gfc_get_derived_type()
[all …]
H A Dtrans.c2240 gcc_assert (ns->proc_name->backend_decl == NULL); in gfc_generate_module_code()
2241 ns->proc_name->backend_decl in gfc_generate_module_code()
2242 = build_decl (gfc_get_location (&ns->proc_name->declared_at), in gfc_generate_module_code()
2243 NAMESPACE_DECL, get_identifier (ns->proc_name->name), in gfc_generate_module_code()
2245 entry = gfc_find_module (ns->proc_name->name); in gfc_generate_module_code()
2249 entry->namespace_decl = ns->proc_name->backend_decl; in gfc_generate_module_code()
2259 if (!n->proc_name) in gfc_generate_module_code()
2263 DECL_CONTEXT (n->proc_name->backend_decl) = ns->proc_name->backend_decl; in gfc_generate_module_code()
2264 gfc_module_add_decl (entry, n->proc_name->backend_decl); in gfc_generate_module_code()
2267 DECL_CONTEXT (el->sym->backend_decl) = ns->proc_name->backend_decl; in gfc_generate_module_code()
[all …]
H A Dclass.c500 else if (derived->ns->proc_name) in get_unique_type_string()
502 string = XNEWVEC (char, strlen (derived->ns->proc_name->name) + len); in get_unique_type_string()
503 sprintf (string, "%s_%s", derived->ns->proc_name->name, dt_name); in get_unique_type_string()
1682 sub_ns->proc_name = final; in generate_finalization_wrapper()
1693 if (ns->proc_name->attr.flavor == FL_MODULE) in generate_finalization_wrapper()
1694 final->module = ns->proc_name->name; in generate_finalization_wrapper()
2314 if (gsym && gsym->ns && ns && ns->proc_name in gfc_find_derived_vtab()
2315 && ns->proc_name->attr.flavor == FL_MODULE) in gfc_find_derived_vtab()
2490 sub_ns->proc_name = copy; in gfc_find_derived_vtab()
2499 if (ns->proc_name->attr.flavor == FL_MODULE) in gfc_find_derived_vtab()
[all …]
H A Dexpr.c1112 && sym->ns->proc_name->attr.is_bind_c in is_CFI_desc()
3442 && sym->ns->proc_name && sym->ns->proc_name->attr.elemental) in check_restricted()
3480 || (sym->ns->proc_name != NULL in check_restricted()
3481 && sym->ns->proc_name->attr.flavor == FL_MODULE) in check_restricted()
3680 if (gfc_current_ns->proc_name in gfc_check_assign()
3681 && gfc_current_ns->proc_name->attr.is_main_program) in gfc_check_assign()
3685 if (gfc_current_ns->proc_name in gfc_check_assign()
3686 && (gfc_current_ns->proc_name->attr.proc == PROC_INTERNAL in gfc_check_assign()
3687 || gfc_current_ns->proc_name->attr.proc == PROC_MODULE) in gfc_check_assign()
3689 && (!(gfc_current_ns->parent->proc_name->attr.function in gfc_check_assign()
[all …]
H A Dsymbol.c338 if (sym->ns->proc_name != NULL in gfc_set_default_type()
339 && (sym->ns->proc_name->attr.subroutine != 0 in gfc_set_default_type()
340 || sym->ns->proc_name->attr.function != 0) in gfc_set_default_type()
341 && sym->ns->proc_name->attr.is_bind_c != 0 in gfc_set_default_type()
350 sym->ns->proc_name->name, in gfc_set_default_type()
351 &(sym->ns->proc_name->declared_at)); in gfc_set_default_type()
367 gfc_symbol *proc = ns->proc_name; in gfc_check_function_type()
1995 if (sym->attr.result && type == BT_UNKNOWN && sym->ns->proc_name) in gfc_add_type()
1996 type = sym->ns->proc_name->ts.type; in gfc_add_type()
2009 sym->ns->proc_name->name, where, gfc_basic_typename (type)); in gfc_add_type()
[all …]
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Dtrans-decl.cc370 gfc_symbol *proc = sym->ns->proc_name; in mangled_identifier()
642 if (sym->ns->proc_name in gfc_finish_var_decl()
643 && (sym->ns->proc_name->backend_decl == current_function_decl in gfc_finish_var_decl()
646 else if (sym->ns->proc_name in gfc_finish_var_decl()
647 && sym->ns->proc_name->attr.flavor == FL_LABEL) in gfc_finish_var_decl()
686 else if (sym->fn_result_spec && !sym->ns->proc_name->module) in gfc_finish_var_decl()
689 if (sym->ns->proc_name->attr.if_source != IFSRC_DECL) in gfc_finish_var_decl()
718 || (sym->value && sym->ns->proc_name->attr.is_main_program) in gfc_finish_var_decl()
743 if (!(sym->ns->proc_name && sym->ns->proc_name->attr.recursive) in gfc_finish_var_decl()
759 && !(sym->ns->proc_name in gfc_finish_var_decl()
[all …]
H A Dresolve.cc574 && sym->ns->parent->proc_name in resolve_contained_fntype()
575 && sym->ns->parent->proc_name->attr.flavor == FL_PROCEDURE in resolve_contained_fntype()
576 && !strcmp (sym->name, sym->ns->parent->proc_name->name)) in resolve_contained_fntype()
622 gcc_assert (ns->parent && ns->parent->proc_name); in resolve_contained_fntype()
623 module_proc = (ns->parent->proc_name->attr.flavor == FL_MODULE); in resolve_contained_fntype()
708 if (ns->proc_name == NULL) in resolve_entries()
717 if (ns->proc_name->attr.entry_master) in resolve_entries()
721 gcc_assert (ns->proc_name->attr.flavor == FL_PROCEDURE); in resolve_entries()
730 el->sym = ns->proc_name; in resolve_entries()
734 ns->proc_name->attr.entry = 1; in resolve_entries()
[all …]
H A Dparse.cc2774 ns->proc_name = main_program; in main_program_symbol()
2794 gfc_current_ns->proc_name = gfc_new_block; in accept_statement()
3845 if (prog_unit == prog_unit->formal_ns->proc_name in parse_interface()
3885 && current_interface.ns->proc_name in parse_interface()
3886 && strcmp (current_interface.ns->proc_name->name, in parse_interface()
3890 &current_interface.ns->proc_name->declared_at); in parse_interface()
3962 if (!gfc_current_ns->proc_name->result) in check_function_result_typed()
3965 ts = gfc_current_ns->proc_name->result->ts; in check_function_result_typed()
4005 gfc_symbol* proc = gfc_current_ns->proc_name; in parse_spec()
4837 my_ns->proc_name = gfc_new_block; in gfc_build_block_ns()
[all …]
H A Ddecl.cc601 gfc_unset_implicit_pure (gfc_current_ns->proc_name); in match_old_style_init()
752 gfc_unset_implicit_pure (gfc_current_ns->proc_name); in gfc_match_data()
1463 if (((sym->ns->proc_name != NULL in get_proc_name()
1464 && sym->ns->proc_name->attr.flavor == FL_MODULE in get_proc_name()
1526 if (sym->ns != NULL && sym->ns->proc_name != NULL) in gfc_verify_c_interop_param()
1528 if (sym->ns->proc_name->attr.is_bind_c == 1) in gfc_verify_c_interop_param()
1540 sym->ns->proc_name->name, in gfc_verify_c_interop_param()
1547 sym->ns->proc_name->name); in gfc_verify_c_interop_param()
1554 sym->ns->proc_name->name); in gfc_verify_c_interop_param()
1561 sym->name, &sym->declared_at, sym->ns->proc_name->name); in gfc_verify_c_interop_param()
[all …]
H A Dopenmp.cc288 && ns->proc_name && ns->proc_name->attr.if_source == IFSRC_IFBODY) in gfc_find_omp_udr()
1287 || sym == sym->ns->proc_name) in gfc_match_omp_clause_reduction()
3195 if (gfc_current_ns->proc_name in gfc_match_oacc_declare()
3196 && gfc_current_ns->proc_name->attr.flavor == FL_MODULE) in gfc_match_oacc_declare()
3429 if (gfc_current_ns->proc_name in gfc_match_oacc_routine()
3430 && gfc_current_ns->proc_name->attr.if_source == IFSRC_IFBODY in gfc_match_oacc_routine()
3460 if (gfc_current_ns->proc_name != NULL in gfc_match_oacc_routine()
3461 && strcmp (sym->name, gfc_current_ns->proc_name->name) == 0) in gfc_match_oacc_routine()
3555 else if (gfc_current_ns->proc_name) in gfc_match_oacc_routine()
3559 oacc_routine_lop lop_p = gfc_current_ns->proc_name->attr.oacc_routine_lop; in gfc_match_oacc_routine()
[all …]
H A Dtrans.cc2332 gcc_assert (ns->proc_name->backend_decl == NULL); in gfc_generate_module_code()
2333 ns->proc_name->backend_decl in gfc_generate_module_code()
2334 = build_decl (gfc_get_location (&ns->proc_name->declared_at), in gfc_generate_module_code()
2335 NAMESPACE_DECL, get_identifier (ns->proc_name->name), in gfc_generate_module_code()
2337 entry = gfc_find_module (ns->proc_name->name); in gfc_generate_module_code()
2341 entry->namespace_decl = ns->proc_name->backend_decl; in gfc_generate_module_code()
2351 if (!n->proc_name) in gfc_generate_module_code()
2355 DECL_CONTEXT (n->proc_name->backend_decl) = ns->proc_name->backend_decl; in gfc_generate_module_code()
2356 gfc_module_add_decl (entry, n->proc_name->backend_decl); in gfc_generate_module_code()
2359 DECL_CONTEXT (el->sym->backend_decl) = ns->proc_name->backend_decl; in gfc_generate_module_code()
[all …]
H A Dclass.cc502 else if (derived->ns->proc_name) in get_unique_type_string()
504 string = XNEWVEC (char, strlen (derived->ns->proc_name->name) + len); in get_unique_type_string()
505 sprintf (string, "%s_%s", derived->ns->proc_name->name, dt_name); in get_unique_type_string()
1699 sub_ns->proc_name = final; in generate_finalization_wrapper()
1710 if (ns->proc_name->attr.flavor == FL_MODULE) in generate_finalization_wrapper()
1711 final->module = ns->proc_name->name; in generate_finalization_wrapper()
2322 if (gsym && gsym->ns && ns && ns->proc_name in gfc_find_derived_vtab()
2323 && ns->proc_name->attr.flavor == FL_MODULE) in gfc_find_derived_vtab()
2501 sub_ns->proc_name = copy; in gfc_find_derived_vtab()
2510 if (ns->proc_name->attr.flavor == FL_MODULE) in gfc_find_derived_vtab()
[all …]
H A Dtrans-types.cc2293 && sym->ns->proc_name in gfc_sym_type()
2294 && sym->ns->proc_name->ts.u.cl in gfc_sym_type()
2295 && sym->ns->proc_name->ts.u.cl->backend_decl != NULL_TREE) in gfc_sym_type()
2296 sym->ts.u.cl->backend_decl = sym->ns->proc_name->ts.u.cl->backend_decl; in gfc_sym_type()
2301 && sym->ns->proc_name in gfc_sym_type()
2302 && sym->ns->proc_name->attr.is_bind_c) in gfc_sym_type()
2369 || (sym->ns->proc_name && sym->ns->proc_name->attr.entry_master)) in gfc_sym_type()
2884 if (derived->module && derived->ns->proc_name in gfc_get_derived_type()
2885 && derived->ns->proc_name->attr.flavor == FL_MODULE) in gfc_get_derived_type()
2887 if (derived->ns->proc_name->backend_decl in gfc_get_derived_type()
[all …]
H A Dexpr.cc1120 && sym->ns->proc_name->attr.is_bind_c in is_CFI_desc()
3474 && sym->ns->proc_name && sym->ns->proc_name->attr.elemental) in check_restricted()
3512 || (sym->ns->proc_name != NULL in check_restricted()
3513 && sym->ns->proc_name->attr.flavor == FL_MODULE) in check_restricted()
3712 if (gfc_current_ns->proc_name in gfc_check_assign()
3713 && gfc_current_ns->proc_name->attr.is_main_program) in gfc_check_assign()
3717 if (gfc_current_ns->proc_name in gfc_check_assign()
3718 && (gfc_current_ns->proc_name->attr.proc == PROC_INTERNAL in gfc_check_assign()
3719 || gfc_current_ns->proc_name->attr.proc == PROC_MODULE) in gfc_check_assign()
3721 && (!(gfc_current_ns->parent->proc_name->attr.function in gfc_check_assign()
[all …]
H A Dsymbol.cc338 if (sym->ns->proc_name != NULL in gfc_set_default_type()
339 && (sym->ns->proc_name->attr.subroutine != 0 in gfc_set_default_type()
340 || sym->ns->proc_name->attr.function != 0) in gfc_set_default_type()
341 && sym->ns->proc_name->attr.is_bind_c != 0 in gfc_set_default_type()
350 sym->ns->proc_name->name, in gfc_set_default_type()
351 &(sym->ns->proc_name->declared_at)); in gfc_set_default_type()
367 gfc_symbol *proc = ns->proc_name; in gfc_check_function_type()
2002 if (sym->attr.result && type == BT_UNKNOWN && sym->ns->proc_name) in gfc_add_type()
2003 type = sym->ns->proc_name->ts.type; in gfc_add_type()
2016 sym->ns->proc_name->name, where, gfc_basic_typename (type)); in gfc_add_type()
[all …]

1234