sem_aux.adb, [...]: Minor reformatting

2011-09-01  Thomas Quinot  <quinot@adacore.com>

	* sem_aux.adb, exp_ch4.adb: Minor reformatting

From-SVN: r178409

gcc/ada/ChangeLog

+2011-09-01  Thomas Quinot  <quinot@adacore.com>
+
+	* sem_aux.adb, exp_ch4.adb: Minor reformatting
+
 2011-09-01  Pascal Obry  <obry@adacore.com>
 
 	* prj-proc.adb, prj.ads, sinput-p.adb: Minor reformatting.

gcc/ada/exp_ch4.adb

@@ -4183,8 +4183,8 @@ package body Exp_Ch4 is
 
          if Present (Actions) then
 
-            --  If we are not allowed to use Expression_With_Actions, just
-            --  skip the optimization, it is not critical for correctness.
+            --  If we are not allowed to use Expression_With_Actions, just skip
+            --  the optimization, it is not critical for correctness.
 
             if not Use_Expression_With_Actions then
                goto Skip_Optimization;
@@ -4454,6 +4454,8 @@ package body Exp_Ch4 is
          Temp_Decl : Node_Id;
          Temp_Id   : Node_Id;
 
+      --  Start of processing for Process_Transient_Object
+
       begin
          --  Step 1: Create the access type which provides a reference to the
          --  transient object.

gcc/ada/sem_aux.adb

@@ -445,9 +445,7 @@ package body Sem_Aux is
       Btype : constant Entity_Id := Base_Type (Ent);
 
    begin
-      if Error_Posted (Ent)
-        or else Error_Posted (Btype)
-      then
+      if Error_Posted (Ent) or else Error_Posted (Btype) then
          return False;
 
       elsif Is_Private_Type (Btype) then