gigi.h (enumerate_modes): Fix formatting.
authorEric Botcazou <ebotcazou@adacore.com>
Sun, 7 Aug 2011 16:47:14 +0000 (16:47 +0000)
committerEric Botcazou <ebotcazou@gcc.gnu.org>
Sun, 7 Aug 2011 16:47:14 +0000 (16:47 +0000)
* 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
gcc/ada/gcc-interface/gigi.h
gcc/ada/gcc-interface/trans.c

index 6d4cad2f3a2c9b7fa9512cdbb18eb82fc860d6cb..d986bd167ba527ffc27278cdc2626c26be3866a7 100644 (file)
@@ -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
index 8c3a2575636d1b5c42ad9dfa92a7c23316e663cf..26ba3fb1f1be3a8118763704c0324c9f5fc27bee 100644 (file)
@@ -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
 }
index f9acdcdfeef66aaf78edbe0c4072ad8bd5f99e66..b0b83b3383baf9ad29909b658f6ff2bffa3bebe0 100644 (file)
@@ -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);