Minor reformatting.

From-SVN: r219224

gcc/ada/prj-env.adb

@@ -1899,20 +1899,26 @@ package body Prj.Env is
       Runtime : String_Ptr;
 
       procedure Add_Target;
+      --  Comment ALWAYS required for nested subprogram spec ???
+
+      ----------------
+      -- Add_Target --
+      ----------------
 
       procedure Add_Target is
       begin
          Add_Str_To_Name_Buffer
            (Path_Separator & Prefix.all & Target_Name);
 
-         --  Note: Target_Name has a trailing / when it comes from
-         --  Sdefault.
+         --  Note: Target_Name has a trailing / when it comes from Sdefault
 
          if Name_Buffer (Name_Len) /= '/' then
             Add_Char_To_Name_Buffer (Directory_Separator);
          end if;
       end Add_Target;
 
+   --  Start of processing for Initialize_Default_Project_Path
+
    begin
       if Is_Initialized (Self) then
          return;