* gcc-interface/gigi.h (enum attr_type): Rename into...
authorebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 28 Jan 2016 11:59:14 +0000 (11:59 +0000)
committerebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 28 Jan 2016 11:59:14 +0000 (11:59 +0000)
(enum attrib_type): ...this.
(struct attrib): Adjust.
* gcc-interface/decl.c (prepend_one_attribute): Likewise.

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

gcc/ada/ChangeLog
gcc/ada/gcc-interface/decl.c
gcc/ada/gcc-interface/gigi.h

index 23780de..c79fafa 100644 (file)
@@ -1,3 +1,10 @@
+2016-01-28  Eric Botcazou  <ebotcazou@adacore.com>
+
+       * gcc-interface/gigi.h (enum attr_type): Rename into...
+       (enum attrib_type): ...this.
+       (struct attrib): Adjust.
+       * gcc-interface/decl.c (prepend_one_attribute): Likewise.
+
 2016-01-20  Eric Botcazou  <ebotcazou@adacore.com>
 
        * exp_ch2.adb (Expand_Current_Value): Make an appropriate character
index 74bc95b..3f2358b 100644 (file)
@@ -151,7 +151,7 @@ struct value_annotation_hasher : ggc_cache_ptr_hash<tree_int_map>
 static GTY ((cache)) hash_table<value_annotation_hasher> *annotate_value_cache;
 
 static void prepend_one_attribute (struct attrib **,
-                                  enum attr_type, tree, tree, Node_Id);
+                                  enum attrib_type, tree, tree, Node_Id);
 static void prepend_one_attribute_pragma (struct attrib **, Node_Id);
 static void prepend_attributes (struct attrib **, Entity_Id);
 static tree elaborate_expression (Node_Id, Entity_Id, const char *, bool, bool,
@@ -6258,14 +6258,14 @@ elaborate_entity (Entity_Id gnat_entity)
 
 static void
 prepend_one_attribute (struct attrib **attr_list,
-                      enum attr_type attr_type,
+                      enum attrib_type attrib_type,
                       tree attr_name,
                       tree attr_args,
                       Node_Id attr_error_point)
 {
   struct attrib * attr = (struct attrib *) xmalloc (sizeof (struct attrib));
 
-  attr->type = attr_type;
+  attr->type = attrib_type;
   attr->name = attr_name;
   attr->args = attr_args;
   attr->error_point = attr_error_point;
@@ -6281,7 +6281,7 @@ prepend_one_attribute_pragma (struct attrib **attr_list, Node_Id gnat_pragma)
 {
   const Node_Id gnat_arg = Pragma_Argument_Associations (gnat_pragma);
   tree gnu_arg0 = NULL_TREE, gnu_arg1 = NULL_TREE;
-  enum attr_type etype;
+  enum attrib_type etype;
 
   /* Map the pragma at hand.  Skip if this isn't one we know how to handle.  */
   switch (Get_Pragma_Id (Chars (Pragma_Identifier (gnat_pragma))))
index 848cabf..a55b1b0 100644 (file)
@@ -342,7 +342,7 @@ extern bool fp_arith_may_widen;
 \f
 /* Data structures used to represent attributes.  */
 
-enum attr_type
+enum attrib_type
 {
   ATTR_MACHINE_ATTRIBUTE,
   ATTR_LINK_ALIAS,
@@ -356,7 +356,7 @@ enum attr_type
 struct attrib
 {
   struct attrib *next;
-  enum attr_type type;
+  enum attrib_type type;
   tree name;
   tree args;
   Node_Id error_point;