Searched refs:proc_name (Results 1 - 22 of 22) sorted by relevance

/haiku-buildtools/gcc/gcc/fortran/
H A Dtrans-decl.c591 if (sym->ns->proc_name->backend_decl == current_function_decl
594 else if (sym->ns->proc_name->attr.flavor == FL_LABEL)
643 || (sym->value && sym->ns->proc_name->attr.is_main_program)
657 if (!sym->ns->proc_name->attr.recursive
701 last = head = sym->ns->proc_name;
829 nest = (procns->proc_name->backend_decl != current_function_decl)
841 || sym->ns->proc_name->attr.flavor == FL_MODULE))
870 DECL_CONTEXT (token) = sym->ns->proc_name->backend_decl;
1134 if (sym->ns->proc_name->backend_decl == current_function_decl
1195 || sym->ns->proc_name
[all...]
H A Dparse.c2163 /* Create a symbol for the main program and assign it to ns->proc_name. */
2180 ns->proc_name = main_program;
2199 gfc_current_ns->proc_name = gfc_new_block;
3046 if (prog_unit == prog_unit->formal_ns->proc_name
3085 && current_interface.ns->proc_name
3086 && strcmp (current_interface.ns->proc_name->name,
3090 &current_interface.ns->proc_name->declared_at);
3162 if (!gfc_current_ns->proc_name->result) return;
3164 ts = gfc_current_ns->proc_name->result->ts;
3194 gfc_symbol* proc = gfc_current_ns->proc_name;
[all...]
H A Ddecl.c536 gfc_unset_implicit_pure (gfc_current_ns->proc_name);
604 gfc_unset_implicit_pure (gfc_current_ns->proc_name);
1015 if (((sym->ns->proc_name != NULL
1016 && sym->ns->proc_name->attr.flavor == FL_MODULE
1078 if (sym->ns != NULL && sym->ns->proc_name != NULL)
1080 if (sym->ns->proc_name->attr.is_bind_c == 1)
1092 sym->ns->proc_name->name,
1099 sym->ns->proc_name->name);
1106 sym->ns->proc_name->name);
1121 sym->ns->proc_name
[all...]
H A Dtrans.c2050 gcc_assert (ns->proc_name->backend_decl == NULL);
2051 ns->proc_name->backend_decl
2052 = build_decl (ns->proc_name->declared_at.lb->location,
2053 NAMESPACE_DECL, get_identifier (ns->proc_name->name),
2055 entry = gfc_find_module (ns->proc_name->name);
2059 entry->namespace_decl = ns->proc_name->backend_decl;
2069 if (!n->proc_name)
2073 DECL_CONTEXT (n->proc_name->backend_decl) = ns->proc_name->backend_decl;
2074 gfc_module_add_decl (entry, n->proc_name
[all...]
H A Dresolve.c603 gcc_assert (ns->parent && ns->parent->proc_name);
604 module_proc = (ns->parent->proc_name->attr.flavor == FL_MODULE);
688 if (ns->proc_name == NULL)
697 if (ns->proc_name->attr.entry_master)
701 gcc_assert (ns->proc_name->attr.flavor == FL_PROCEDURE);
710 el->sym = ns->proc_name;
714 ns->proc_name->attr.entry = 1;
721 if (ns->proc_name->attr.function
722 && ns->parent && ns->parent->proc_name->attr.flavor == FL_MODULE)
729 if (el->sym->ns->proc_name
[all...]
H A Dopenmp.c181 && ns->proc_name && ns->proc_name->attr.if_source == IFSRC_IFBODY)
789 || sym == sym->ns->proc_name)
1424 if (gfc_current_ns->proc_name
1425 && gfc_current_ns->proc_name->attr.if_source == IFSRC_IFBODY
1434 && gfc_current_ns->proc_name
1437 if (!gfc_add_omp_declare_target (&gfc_current_ns->proc_name->attr,
1438 gfc_current_ns->proc_name->name,
1623 gfc_symbol *proc_name; local
1627 if (gfc_match (" ( %s ) ", &proc_name) !
[all...]
H A Dtrans-types.c2175 && sym->ns->proc_name
2176 && sym->ns->proc_name->attr.is_bind_c)
2237 || (sym->ns->proc_name && sym->ns->proc_name->attr.entry_master))
2649 if (derived->module && derived->ns->proc_name
2650 && derived->ns->proc_name->attr.flavor == FL_MODULE)
2652 if (derived->ns->proc_name->backend_decl
2653 && TREE_CODE (derived->ns->proc_name->backend_decl)
2656 TYPE_CONTEXT (typenode) = derived->ns->proc_name->backend_decl;
2658 = derived->ns->proc_name
[all...]
H A Dexpr.c2907 && sym->ns->proc_name && sym->ns->proc_name->attr.elemental)
2946 || (sym->ns->proc_name != NULL
2947 && sym->ns->proc_name->attr.flavor == FL_MODULE)
3132 if (gfc_current_ns->proc_name
3133 && gfc_current_ns->proc_name->attr.is_main_program)
3137 if (gfc_current_ns->proc_name
3138 && (gfc_current_ns->proc_name->attr.proc == PROC_INTERNAL
3139 || gfc_current_ns->proc_name->attr.proc == PROC_MODULE)
3141 && (!(gfc_current_ns->parent->proc_name
[all...]
H A Dsymbol.c284 if (sym->ns->proc_name != NULL
285 && (sym->ns->proc_name->attr.subroutine != 0
286 || sym->ns->proc_name->attr.function != 0)
287 && sym->ns->proc_name->attr.is_bind_c != 0
296 sym->ns->proc_name->name,
297 &(sym->ns->proc_name->declared_at));
313 gfc_symbol *proc = ns->proc_name;
1703 if (sym->attr.result && type == BT_UNKNOWN && sym->ns->proc_name)
1704 type = sym->ns->proc_name->ts.type;
2184 while (ns->proc_name
[all...]
H A Dclass.c486 else if (derived->ns->proc_name)
487 sprintf (string, "%s_%s", derived->ns->proc_name->name, dt_name);
1598 sub_ns->proc_name = final;
1608 if (ns->proc_name->attr.flavor == FL_MODULE)
1609 final->module = ns->proc_name->name;
2353 sub_ns->proc_name = copy;
2362 if (ns->proc_name->attr.flavor == FL_MODULE)
2363 copy->module = ns->proc_name->name;
2621 if (contained->proc_name
2622 && strcmp (name, contained->proc_name
[all...]
H A Dtrans-common.c728 && s->sym->ns->proc_name
729 && s->sym->ns->proc_name->attr.flavor == FL_MODULE)
1243 c->where = ns->proc_name->declared_at;
H A Dmodule.c3934 ods->proc_name = ns->proc_name;
4094 sym->formal_ns->proc_name = sym;
4140 && sym->formal_ns->proc_name == sym
4641 udr->combiner_ns->proc_name = gfc_current_ns->proc_name;
4647 udr->initializer_ns->proc_name = gfc_current_ns->proc_name;
4709 /* Use the module sym as 'proc_name' so that gfc_get_symbol_decl
4711 if (!ns->proc_name)
[all...]
H A Dprimary.c1443 if (ns->proc_name == sym)
2697 && (*sym) == gfc_current_ns->proc_name
2698 && (*sym) == (*sym)->result->ns->proc_name
2764 && gfc_current_ns->proc_name == sym
3308 if (gfc_current_ns->proc_name == sym)
H A Dtrans-openmp.c1252 proc_sym = sym->ns->proc_name;
1281 && sym->ns->proc_name->attr.entry_master
1282 && !gfc_return_by_reference (sym->ns->proc_name);
1287 || (sym->ns && sym->ns->proc_name
1288 && sym->ns->proc_name->backend_decl == parent_decl
1301 && (sym->ns->proc_name->backend_decl == current_function_decl
1315 && (sym->ns->proc_name->backend_decl == current_function_decl
4502 tree fndecl = ns->proc_name->backend_decl;
H A Dtrans-expr.c1306 || code->expr1->symtree->n.sym->ns->proc_name->attr.entry_master)
2360 && sym->ns->proc_name->attr.entry_master
2361 && !gfc_return_by_reference (sym->ns->proc_name);
2366 || (sym->ns && sym->ns->proc_name
2368 && sym->ns->proc_name->backend_decl == parent_decl
2381 && (sym->ns->proc_name->backend_decl == current_function_decl
2395 && (sym->ns->proc_name->backend_decl == current_function_decl
2469 se->string_length = sym->ns->proc_name->ts.u.cl->backend_decl;
4826 && fsym->ns->proc_name != NULL
4827 && fsym->ns->proc_name
[all...]
H A Dmatch.c3695 b3 = sym && sym->ns && sym->ns->proc_name
3696 && (sym->ns->proc_name->attr.allocatable
3697 || sym->ns->proc_name->attr.pointer
3698 || sym->ns->proc_name->attr.proc_pointer);
H A Dgfortran.h1266 gfc_symbol *proc_name; member in struct:gfc_omp_declare_simd
1629 struct gfc_symbol *proc_name; member in struct:gfc_namespace
H A Dtrans-array.c6176 || (sym->ns->proc_name->attr.entry_master
7073 const gfc_symbol *fsym, const char *proc_name,
7369 if (fsym && proc_name)
7371 "'%s' of procedure '%s'", fsym->name, proc_name);
8908 && !sym->ns->proc_name->attr.is_main_program)
8919 && !sym->ns->proc_name->attr.is_main_program)
8929 && !sym->ns->proc_name->attr.is_main_program)
7072 gfc_conv_array_parameter(gfc_se * se, gfc_expr * expr, bool g77, const gfc_symbol *fsym, const char *proc_name, tree *size) argument
H A Dcheck.c539 if (ns->proc_name == e->symtree->n.sym)
4549 if (x->symtree->n.sym == ns->proc_name)
H A Dintrinsic.c4832 if (in_module || sym->ns->proc_name)
H A Dtrans-stmt.c1764 sym = ns->proc_name;
/haiku-buildtools/gcc/libsanitizer/asan/
H A Dasan_win_dll_thunk.cc27 void *__stdcall GetProcAddress(void *module, const char *proc_name);

Completed in 504 milliseconds