OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

gigi.h (enum attr_type): Rename into... 

* gcc-interface/gigi.h (enum attr_type): Rename into...
	(enum attrib_type): ...this.
	(struct attrib): Adjust.
	* gcc-interface/decl.c (prepend_one_attribute): Likewise.

From-SVN: r232923
This commit is contained in:
Eric Botcazou 2016-01-28 11:59:14 +00:00 committed by Eric Botcazou
parent c428f91cb7
commit e0ef6912de
3 changed files with 13 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gcc/ada/ChangeLog
View 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

8
gcc/ada/gcc-interface/decl.c
View 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))))

4
gcc/ada/gcc-interface/gigi.h
View File

@ -342,7 +342,7 @@ extern bool fp_arith_may_widen;
/* 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;