> 2012-11-15 Diego Novillo <dnovi...@google.com>
>
> Adjust for new vec API (http://gcc.gnu.org/wiki/cxx-conversion/cxx-vec)
>
> * gcc-interface/decl.c: Use new vec API in vec.h.
> * gcc-interface/gigi.h: Likewise.
> * gcc-interface/trans.c: Likewise.
> * gcc-interface/utils.c: Likewise.
> * gcc-interface/utils2.c: Likewise.
Thanks for the great work, everything seems to be working fine in Ada.
Minor nit: the patch has introduced a couple of trailing spaces. No big deal,
but we have a script that rejects the changes in this case. Fixed thusly.
2012-11-18 Eric Botcazou <ebotca...@adacore.com>
* gcc-interface/decl.c: Remove trailing spaces.
* gcc-interface/trans.c: Remove trailing spaces.
--
Eric BotcazouIndex: gcc-interface/decl.c
===================================================================
--- gcc-interface/decl.c (revision 193596)
+++ gcc-interface/decl.c (working copy)
@@ -7549,7 +7549,7 @@ build_position_list (tree gnu_type, bool
of operands to SUBSTITUTE_IN_EXPR. DEFINITION is true if this is for
a definition of GNAT_SUBTYPE. */
-static vec<subst_pair>
+static vec<subst_pair>
build_subst_list (Entity_Id gnat_subtype, Entity_Id gnat_type, bool definition)
{
vec<subst_pair> gnu_list = vec<subst_pair>();
@@ -7582,7 +7582,7 @@ build_subst_list (Entity_Id gnat_subtype
the substitutions described in SUBST_LIST. GNU_LIST is a pre-existing
list to be prepended to the newly created entries. */
-static vec<variant_desc>
+static vec<variant_desc>
build_variant_list (tree qual_union_type, vec<subst_pair> subst_list,
vec<variant_desc> gnu_list)
{
Index: gcc-interface/trans.c
===================================================================
--- gcc-interface/trans.c (revision 193596)
+++ gcc-interface/trans.c (working copy)
@@ -3323,7 +3323,7 @@ Subprogram_Body_to_gnu (Node_Id gnat_nod
{
tree gnu_return_var = NULL_TREE;
- vec_safe_push (gnu_return_label_stack,
+ vec_safe_push (gnu_return_label_stack,
create_artificial_label (input_location));
start_stmt_group ();
@@ -4385,7 +4385,7 @@ Handled_Sequence_Of_Statements_to_gnu (N
start_stmt_group ();
gnat_pushlevel ();
- vec_safe_push (gnu_except_ptr_stack,
+ vec_safe_push (gnu_except_ptr_stack,
create_var_decl (get_identifier ("EXCEPT_PTR"), NULL_TREE,
build_pointer_type (except_type_node),
build_call_n_expr (get_excptr_decl, 0),
