Minor reformatting.

From-SVN: r145813

gcc/ada/exp_dist.adb

@@ -9148,10 +9148,11 @@ package body Exp_Dist is
                                    (RTE (RE_Release_Buffer), Loc),
                                Parameter_Associations =>
                                  New_List (New_Occurrence_Of (Strm, Loc))),
+
                              Make_Simple_Return_Statement (Loc,
                                Expression => New_Occurrence_Of (Res, Loc))))));
-                  else
 
+                  else
                      --  declare
                      --     Res : T;
                      --  begin
@@ -9180,15 +9181,16 @@ package body Exp_Dist is
                                      New_Occurrence_Of (Strm, Loc),
                                    Attribute_Name => Name_Access),
                                  New_Occurrence_Of (Res, Loc))),
+
                              Make_Procedure_Call_Statement (Loc,
                                Name                   =>
                                  New_Occurrence_Of
                                    (RTE (RE_Release_Buffer), Loc),
                                Parameter_Associations =>
                                  New_List (New_Occurrence_Of (Strm, Loc))),
+
                              Make_Simple_Return_Statement (Loc,
                                Expression => New_Occurrence_Of (Res, Loc))))));
-
                   end if;
                end;
             end if;

gcc/ada/sem_ch4.adb

@@ -2661,8 +2661,7 @@ package body Sem_Ch4 is
                      Set_Etype (Nam, It.Typ);
 
                   else
-
-                     --  Nnamed access type in the context of a renaming
+                     --  Named access type in the context of a renaming
                      --  declaration with an access definition. Remove
                      --  inapplicable candidate.