From: Robert Dewar <dewar@adacore.com>
Date: Tue, 5 Aug 2008 09:28:12 +0000 (+0200)
Subject: make.adb: Minor reformatting
X-Git-Tag: releases/gcc-4.4.0~3369
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=33395f44ba7145d1a340cd76c638bda2a7c892e1;p=thirdparty%2Fgcc.git

make.adb: Minor reformatting

2008-08-05  Robert Dewar  <dewar@adacore.com>

	* make.adb: Minor reformatting

From-SVN: r138686
---

diff --git a/gcc/ada/make.adb b/gcc/ada/make.adb
index 6a5e8b961fc8..1b5d7124e2b9 100644
--- a/gcc/ada/make.adb
+++ b/gcc/ada/make.adb
@@ -5110,39 +5110,42 @@ package body Make is
 
                   declare
                      Defaults : constant Variable_Value :=
-                       Prj.Util.Value_Of
-                         (Name                    => Name_Ada,
-                          Index                   => 0,
-                          Attribute_Or_Array_Name => Name_Default_Switches,
-                          In_Package              => Builder_Package,
-                          In_Tree                 => Project_Tree);
+                                  Prj.Util.Value_Of
+                                    (Name                    => Name_Ada,
+                                     Index                   => 0,
+                                     Attribute_Or_Array_Name =>
+                                       Name_Default_Switches,
+                                     In_Package              =>
+                                       Builder_Package,
+                                     In_Tree                 => Project_Tree);
 
                      Switches : constant Array_Element_Id :=
-                          Prj.Util.Value_Of
-                             (Name      => Name_Switches,
-                              In_Arrays =>
-                                Project_Tree.Packages.Table
-                                  (Builder_Package).Decl.Arrays,
-                              In_Tree   => Project_Tree);
+                                  Prj.Util.Value_Of
+                                    (Name      => Name_Switches,
+                                     In_Arrays =>
+                                       Project_Tree.Packages.Table
+                                         (Builder_Package).Decl.Arrays,
+                                     In_Tree   => Project_Tree);
 
                      Other_Switches : constant Variable_Value :=
-                           Prj.Util.Value_Of
-                             (Name                    => All_Other_Names,
-                              Index                   => 0,
-                              Attribute_Or_Array_Name => Name_Switches,
-                              In_Package              => Builder_Package,
-                              In_Tree                 => Project_Tree);
+                                        Prj.Util.Value_Of
+                                          (Name        => All_Other_Names,
+                                           Index       => 0,
+                                           Attribute_Or_Array_Name
+                                                       => Name_Switches,
+                                           In_Package  => Builder_Package,
+                                           In_Tree     => Project_Tree);
 
                   begin
                      if Other_Switches /= Nil_Variable_Value then
                         if not Quiet_Output
                           and then Switches /= No_Array_Element
                           and then Project_Tree.Array_Elements.Table
-                                (Switches).Next /= No_Array_Element
+                                     (Switches).Next /= No_Array_Element
                         then
                            Write_Line
-                             ("Warning: using Builder'Switches(others), " &
-                              "as there are several mains");
+                             ("Warning: using Builder'Switches(others), "
+                              & "as there are several mains");
                         end if;
 
                         Add_Switches
@@ -5156,8 +5159,8 @@ package body Make is
                           and then Switches /= No_Array_Element
                         then
                            Write_Line
-                             ("Warning: using Builder'Default_Switches" &
-                              "(""Ada""), as there are several mains");
+                             ("Warning: using Builder'Default_Switches"
+                              & "(""Ada""), as there are several mains");
                         end if;
 
                         Add_Switches
@@ -5170,8 +5173,8 @@ package body Make is
                        and then Switches /= No_Array_Element
                      then
                         Write_Line
-                          ("Warning: using no switches from package " &
-                           "Builder, as there are several mains");
+                          ("Warning: using no switches from package "
+                           & "Builder, as there are several mains");
                      end if;
                   end;
                end if;