d094bd696b
ports collection! :-) PR: 17578 Submitted by: Anton N. Breusov <antonz@library.ntu-kpi.kiev.ua> No objections from: asami, obrien
44 lines
962 B
Text
44 lines
962 B
Text
*** function.c.orig Sat Feb 28 22:58:16 1998
|
|
--- function.c Thu Mar 23 15:34:50 2000
|
|
***************
|
|
*** 463,468 ****
|
|
--- 463,491 ----
|
|
/* Given a function decl for a containing function,
|
|
return the `struct function' for it. */
|
|
|
|
+ #ifdef GPC
|
|
+ struct function *
|
|
+ maybe_find_function_data (decl)
|
|
+ tree decl;
|
|
+ {
|
|
+ struct function *p;
|
|
+ for (p = outer_function_chain; p; p = p->next)
|
|
+ if (p->decl == decl)
|
|
+ return p;
|
|
+ return (struct function *)NULL;
|
|
+ }
|
|
+
|
|
+ struct function *
|
|
+ find_function_data (decl)
|
|
+ tree decl;
|
|
+ {
|
|
+ struct function *p = maybe_find_function_data (decl);
|
|
+ if (!p)
|
|
+ abort ();
|
|
+ return p;
|
|
+ }
|
|
+
|
|
+ #else /* not GPC */
|
|
struct function *
|
|
find_function_data (decl)
|
|
tree decl;
|
|
***************
|
|
*** 475,480 ****
|
|
--- 498,504 ----
|
|
|
|
abort ();
|
|
}
|
|
+ #endif /* not GPC */
|
|
|
|
/* Save the current context for compilation of a nested function.
|
|
This is called from language-specific code.
|