From 588c8f488fd5294c83c6733c950d9902dcb9f15b Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Sun, 7 Aug 2011 16:47:14 +0000 Subject: [PATCH] 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 --- gcc/ada/ChangeLog | 4 ++++ gcc/ada/gcc-interface/gigi.h | 2 +- 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 6d4cad2f3a2..d986bd167ba 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 * 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 8c3a2575636..26ba3fb1f1b 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 f9acdcdfeef..b0b83b3383b 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); -- 2.30.2