diff options
| author | Laurent GUERBY <laurent@guerby.net> | 2009-06-26 17:06:52 +0000 |
|---|---|---|
| committer | Laurent Guerby <guerby@gcc.gnu.org> | 2009-06-26 17:06:52 +0000 |
| commit | 6bf68a93f60cf873c4a0713bb11480d838fb5af0 (patch) | |
| tree | 20d7a88e927511698c3d4b43e91c0b3cffcf82ad /gcc/ada/gcc-interface/trans.c | |
| parent | bae4cf874ea098e56b8dc9ab755eb1669b749aeb (diff) | |
| download | gcc-6bf68a93f60cf873c4a0713bb11480d838fb5af0.zip gcc-6bf68a93f60cf873c4a0713bb11480d838fb5af0.tar.gz gcc-6bf68a93f60cf873c4a0713bb11480d838fb5af0.tar.bz2 | |
tb-gcc.c (trace_callback): Use char* instead of void*.
2009-06-26 Laurent GUERBY <laurent@guerby.net>
* tb-gcc.c (trace_callback): Use char* instead of void*.
* gcc-interface/misc.c (enumerate_modes): Make loop compatible
with C++.
* gcc-interface/trans.c (parm_attr): Rename to parm_attr_d.
Change all uses.
* gcc-interface/utils.c (new, class, template): Rename to be
compatible with C++. Change all uses.
* gcc-interface/decl.c (new): Likewise.
From-SVN: r148975
Diffstat (limited to 'gcc/ada/gcc-interface/trans.c')
| -rw-r--r-- | gcc/ada/gcc-interface/trans.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index c4b095b..24163b8 100644 --- a/gcc/ada/gcc-interface/trans.c +++ b/gcc/ada/gcc-interface/trans.c @@ -100,7 +100,7 @@ bool type_annotate_only; /* When not optimizing, we cache the 'First, 'Last and 'Length attributes of unconstrained array IN parameters to avoid emitting a great deal of redundant instructions to recompute them each time. */ -struct GTY (()) parm_attr { +struct GTY (()) parm_attr_d { int id; /* GTY doesn't like Entity_Id. */ int dim; tree first; @@ -108,7 +108,7 @@ struct GTY (()) parm_attr { tree length; }; -typedef struct parm_attr *parm_attr; +typedef struct parm_attr_d *parm_attr; DEF_VEC_P(parm_attr); DEF_VEC_ALLOC_P(parm_attr,gc); @@ -1464,7 +1464,7 @@ Attribute_to_gnu (Node_Id gnat_node, tree *gnu_result_type_p, int attribute) int Dimension = (Present (Expressions (gnat_node)) ? UI_To_Int (Intval (First (Expressions (gnat_node)))) : 1), i; - struct parm_attr *pa = NULL; + struct parm_attr_d *pa = NULL; Entity_Id gnat_param = Empty; /* Make sure any implicit dereference gets done. */ @@ -1508,7 +1508,7 @@ Attribute_to_gnu (Node_Id gnat_node, tree *gnu_result_type_p, int attribute) if (!pa) { - pa = GGC_CNEW (struct parm_attr); + pa = GGC_CNEW (struct parm_attr_d); pa->id = gnat_param; pa->dim = Dimension; VEC_safe_push (parm_attr, gc, f_parm_attr_cache, pa); @@ -2268,7 +2268,7 @@ Subprogram_Body_to_gnu (Node_Id gnat_node) cache = DECL_STRUCT_FUNCTION (gnu_subprog_decl)->language->parm_attr_cache; if (cache) { - struct parm_attr *pa; + struct parm_attr_d *pa; int i; start_stmt_group (); |