tree.c (build_function_type_list): Update function comment.

2002-07-01  Aldy Hernandez  <aldyh@redhat.com>

        * tree.c (build_function_type_list): Update function comment.
        Rename first argument to return_type.

From-SVN: r55141

2 files changed, 13 insertions, 7 deletions

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 1a67262..84b62a9 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2002-07-01  Aldy Hernandez  <aldyh@redhat.com>
+
+        * tree.c (build_function_type_list): Update function comment.
+        Rename first argument to return_type.
+
 2002-07-01  Neil Booth  <neil@daikokuya.co.uk>
 
 	* Makefile.in: Remove all trace of tradcpp.c, tradcpp.h,
diff --git a/gcc/tree.c b/gcc/tree.c
index 78364e1..b307a94 100644
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -3801,17 +3801,18 @@ build_function_type (value_type, arg_types)
   return t;
 }
 
-/* Like build_function_type, but take a vararg list of nodes.  The
-   list of nodes should end with a NULL_TREE.  This is typically used
-   for creating function types for builtins.  */
+/* Build a function type.  The RETURN_TYPE is the type retured by the
+   function.  If additional arguments are provided, they are
+   additional argument types.  The list of argument types must always
+   be terminated by NULL_TREE.  */
 
 tree
-build_function_type_list VPARAMS ((tree first, ...))
+build_function_type_list VPARAMS ((tree return_type, ...))
 {
   tree t, args, last;
 
-  VA_OPEN (p, first);
-  VA_FIXEDARG (p, tree, first);
+  VA_OPEN (p, return_type);
+  VA_FIXEDARG (p, tree, return_type);
 
   t = va_arg (p, tree);
   for (args = NULL_TREE; t != NULL_TREE; t = va_arg (p, tree))
@@ -3820,7 +3821,7 @@ build_function_type_list VPARAMS ((tree first, ...))
   last = args;
   args = nreverse (args);
   TREE_CHAIN (last) = void_list_node;
-  args = build_function_type (first, args);
+  args = build_function_type (return_type, args);
 
   VA_CLOSE (p);
   return args;