*** empty log message ***

[pf3gnuchains/gcc-fork.git] / gcc / tree.c

diff --git a/gcc/tree.c b/gcc/tree.c
index 2b914a6..5207ba1 100644 (file)
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -3104,22 +3104,22 @@ int_fits_type_p (c, type)
            && !INT_CST_LT (c, TYPE_MIN_VALUE (type)));
 }
 
-/* Return the innermost context enclosing FNDECL that is
+/* Return the innermost context enclosing DECL that is
    a FUNCTION_DECL, or zero if none.  */
 
 tree
-decl_function_context (fndecl)
-     tree fndecl;
+decl_function_context (decl)
+     tree decl;
 {
   tree context;
 
-  if (TREE_CODE (fndecl) == ERROR_MARK)
+  if (TREE_CODE (decl) == ERROR_MARK)
     return 0;
 
-  if (TREE_CODE (fndecl) == SAVE_EXPR)
-    context = SAVE_EXPR_CONTEXT (fndecl);
+  if (TREE_CODE (decl) == SAVE_EXPR)
+    context = SAVE_EXPR_CONTEXT (decl);
   else
-    context = DECL_CONTEXT (fndecl);
+    context = DECL_CONTEXT (decl);
 
   while (context && TREE_CODE (context) != FUNCTION_DECL)
     {
@@ -3138,15 +3138,15 @@ decl_function_context (fndecl)
   return context;
 }
 
-/* Return the innermost context enclosing FNDECL that is
+/* Return the innermost context enclosing DECL that is
    a RECORD_TYPE or UNION_TYPE, or zero if none.
    TYPE_DECLs and FUNCTION_DECLs are transparent to this function.  */
 
 tree
-decl_type_context (fndecl)
-     tree fndecl;
+decl_type_context (decl)
+     tree decl;
 {
-  tree context = DECL_CONTEXT (fndecl);
+  tree context = DECL_CONTEXT (decl);
 
   while (context)
     {