trans.c (gnat_to_gnu): Reformat lines to fit in 80 columns.
authorOlivier Hainque <hainque@adacore.com>
Thu, 22 Nov 2007 09:04:02 +0000 (09:04 +0000)
committerOlivier Hainque <hainque@gcc.gnu.org>
Thu, 22 Nov 2007 09:04:02 +0000 (09:04 +0000)
2007-11-22  Olivier Hainque  <hainque@adacore.com>

        * trans.c (gnat_to_gnu) <case N_Free_Statement>: Reformat lines
        to fit in 80 columns.

From-SVN: r130343

gcc/ada/ChangeLog
gcc/ada/trans.c

index dc164f685f5d87de8ca84dfc49f18acf961422ce..67e7105729963b3bd4b2ed5df5a1b24681f2e7e4 100644 (file)
@@ -1,3 +1,8 @@
+2007-11-22  Olivier Hainque  <hainque@adacore.com>
+
+       * trans.c (gnat_to_gnu) <case N_Free_Statement>: Reformat lines
+       to fit in 80 columns.
+
 2007-11-21  Aurelien Jarno <aurelien@aurel32.net>
 
        * s-osinte-kfreebsd-gnu.ads (To_Target_Priority): New function.
index df6ab75bf04929c10450ad48a24bf593c12a1143..04fe61bc0b96988ad9a13d1b2dc50bac7e75bcd7 100644 (file)
@@ -4635,25 +4635,29 @@ gnat_to_gnu (Node_Id gnat_node)
             initial allocator's return value, which has been stored just in
             front of the block we have.  */
  
-         if (No (Procedure_To_Call (gnat_node)) && align > default_allocator_alignment
+         if (No (Procedure_To_Call (gnat_node))
+             && align > default_allocator_alignment
              && ! TYPE_FAT_OR_THIN_POINTER_P (gnu_ptr_type))
            {
              /* We set GNU_PTR
                 as * (void **)((void *)GNU_PTR - (void *)sizeof(void *))
-                in two steps: */
+                in two steps:  */
              
-             /* GNU_PTR (void *) = (void *)GNU_PTR - (void *)sizeof (void *))  */
+             /* GNU_PTR (void *)
+                = (void *)GNU_PTR - (void *)sizeof (void *))  */
              gnu_ptr
-               = build_binary_op (MINUS_EXPR, ptr_void_type_node,
-                                  convert (ptr_void_type_node, gnu_ptr),
-                                  convert (ptr_void_type_node,
-                                           TYPE_SIZE_UNIT (ptr_void_type_node)));
+               = build_binary_op
+                   (MINUS_EXPR, ptr_void_type_node,
+                    convert (ptr_void_type_node, gnu_ptr),
+                    convert (ptr_void_type_node,
+                             TYPE_SIZE_UNIT (ptr_void_type_node)));
              
              /* GNU_PTR (void *) = *(void **)GNU_PTR  */
              gnu_ptr
-               = build_unary_op (INDIRECT_REF, NULL_TREE,
-                                 convert (build_pointer_type (ptr_void_type_node),
-                                          gnu_ptr));
+               = build_unary_op
+                   (INDIRECT_REF, NULL_TREE,
+                    convert (build_pointer_type (ptr_void_type_node),
+                             gnu_ptr));
            }
  
          gnu_result = build_call_alloc_dealloc (gnu_ptr, gnu_obj_size, align,