OSDN Git Service

2002-07-01 Aldy Hernandez <aldyh@redhat.com>
authoraldyh <aldyh@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 1 Jul 2002 18:40:24 +0000 (18:40 +0000)
committeraldyh <aldyh@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 1 Jul 2002 18:40:24 +0000 (18:40 +0000)
        * tree.c (build_function_type_list): Update function comment.
        Rename first argument to return_type.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@55141 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/ChangeLog
gcc/tree.c

index 1a67262..84b62a9 100644 (file)
@@ -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,
index 78364e1..b307a94 100644 (file)
@@ -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;