2007-11-22 Olivier Hainque <hainque@adacore.com>

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

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@130343 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index dc164f6..67e7105 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -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.

diff --git a/gcc/ada/trans.c b/gcc/ada/trans.c
index df6ab75..04fe61b 100644 (file)
--- a/gcc/ada/trans.c
+++ b/gcc/ada/trans.c
@@ -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,