* prj-util.adb: Minor reformatting

From-SVN: r46546

gcc/ada/ChangeLog

@@ -4,6 +4,10 @@
 
 2001-10-26  Robert Dewar <dewar@gnat.com>
 
+	* prj-util.adb: Minor reformatting
+
+2001-10-26  Robert Dewar <dewar@gnat.com>
+
 	* prj-attr.adb: Minor reformatting throughout
 
 2001-10-26  Robert Dewar <dewar@gnat.com>

gcc/ada/prj-util.adb

@@ -320,6 +320,7 @@ package body Prj.Util is
    begin
       while Current /= No_Array loop
          The_Array := Arrays.Table (Current);
+
          if The_Array.Name = Name then
             return The_Array.Value;
          else
@@ -341,8 +342,8 @@ package body Prj.Util is
    begin
       while Current /= No_Package loop
          The_Package := Packages.Table (Current);
-         exit when The_Package.Name /= No_Name and then
-           The_Package.Name = Name;
+         exit when The_Package.Name /= No_Name
+           and then The_Package.Name = Name;
          Current := The_Package.Next;
       end loop;