diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2011-08-07 16:47:14 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2011-08-07 16:47:14 +0000 |
| commit | 588c8f488fd5294c83c6733c950d9902dcb9f15b (patch) | |
| tree | 0c50a184a39aa90f648ee732a7afd2a97049a7f2 /gcc/ada | |
| parent | a5db4ced8111a5650ebc0a90cfa2c7ee1eea883e (diff) | |
| download | gcc-588c8f488fd5294c83c6733c950d9902dcb9f15b.zip gcc-588c8f488fd5294c83c6733c950d9902dcb9f15b.tar.gz gcc-588c8f488fd5294c83c6733c950d9902dcb9f15b.tar.bz2 | |
gigi.h (enumerate_modes): Fix formatting.
* gcc-interface/gigi.h (enumerate_modes): Fix formatting.
* gcc-interface/trans.c (Subprogram_Body_to_gnu): Revert latest change.
From-SVN: r177548
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/gcc-interface/gigi.h | 2 | ||||
| -rw-r--r-- | gcc/ada/gcc-interface/trans.c | 6 |
3 files changed, 5 insertions, 7 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 6d4cad2..d986bd1 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -2,6 +2,10 @@ * gcc-interface/Makefile.in (raise-gcc.o): Fix previous change. + * gcc-interface/gigi.h (enumerate_modes): Fix formatting. + + * gcc-interface/trans.c (Subprogram_Body_to_gnu): Revert latest change. + 2011-08-05 Nicolas Roche <roche@adacore.com> * gcc-interface/Makefile.in: Don't use directly ../xgcc to build shared diff --git a/gcc/ada/gcc-interface/gigi.h b/gcc/ada/gcc-interface/gigi.h index 8c3a257..26ba3fb 100644 --- a/gcc/ada/gcc-interface/gigi.h +++ b/gcc/ada/gcc-interface/gigi.h @@ -968,7 +968,7 @@ extern Nat get_target_double_scalar_alignment (void); /* This function is called by the front-end to enumerate all the supported modes for the machine, as well as some predefined C types. */ extern void enumerate_modes (void (*f) (const char *, int, int, int, int, int, - int)); + int)); #ifdef __cplusplus } diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index f9acdcd..b0b83b3 100644 --- a/gcc/ada/gcc-interface/trans.c +++ b/gcc/ada/gcc-interface/trans.c @@ -2762,12 +2762,6 @@ Subprogram_Body_to_gnu (Node_Id gnat_node) end_subprog_body (gnu_result); - /* Attempt setting the end_locus of our GCC body tree, typically a - BIND_EXPR or STATEMENT_LIST, then the end_locus of our GCC subprogram - declaration tree. */ - set_end_locus_from_node (gnu_result, gnat_node); - set_end_locus_from_node (gnu_subprog_decl, gnat_node); - /* Finally annotate the parameters and disconnect the trees for parameters that we have turned into variables since they are now unusable. */ for (gnat_param = First_Formal_With_Extras (gnat_subprog_id); |