c-decl.c (grokparm): New function.

[gcc/ChangeLog]
2004-08-25  Ziemowit Laski  <zlaski@apple.com>

        * c-decl.c (grokparm): New function.
        * c-tree.h (grokparm): New prototype.

From-SVN: r86587

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 7229f5a6e25ffe002110ef187496c437fec4c71d..7770a07a8dc7b7252b8b7008fc730de4456204cb 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2004-08-25  Ziemowit Laski  <zlaski@apple.com>
+
+       * c-decl.c (grokparm): New function.
+       * c-tree.h (grokparm): New prototype.
+
 2004-08-25  Andrew MacLeod  <amacleod@redhat.com>
 
        * tree-ssa-operands.h (struct ssa_operand_iterator_d): New.  SSA operand

diff --git a/gcc/c-decl.c b/gcc/c-decl.c
index e9a9036e5ee3a34a2634c5da20dee7f064780b31..6630d9a3488e82a34cb11046e1896c00b132a74c 100644 (file)
--- a/gcc/c-decl.c
+++ b/gcc/c-decl.c
@@ -3153,6 +3153,20 @@ finish_decl (tree decl, tree init, tree asmspec_tree)
     }
 }
 
+/* Given a parsed parameter declaration, decode it into a PARM_DECL.  */
+
+tree
+grokparm (tree parm)
+{
+  tree decl = grokdeclarator (TREE_VALUE (TREE_PURPOSE (parm)),
+                             TREE_PURPOSE (TREE_PURPOSE (parm)),
+                             PARM, false, NULL);
+
+  decl_attributes (&decl, TREE_VALUE (parm), 0);
+
+  return decl;
+}
+
 /* Given a parsed parameter declaration, decode it into a PARM_DECL
    and push that on the current scope.  */
 

diff --git a/gcc/c-tree.h b/gcc/c-tree.h
index 41abd262968c7d4b7b918543da8df3e83e0f10dc..5c99f47aa0ef773c250fa8c78b68a8af41ae8c2d 100644 (file)
--- a/gcc/c-tree.h
+++ b/gcc/c-tree.h
@@ -180,6 +180,7 @@ extern tree get_parm_info (bool);
 extern tree grokfield (tree, tree, tree);
 extern tree groktypename (tree);
 extern tree groktypename_in_parm_context (tree);
+extern tree grokparm (tree);
 extern tree implicitly_declare (tree);
 extern void keep_next_level (void);
 extern tree lookup_name (tree);