[Ada] Minor editorial changes in comments
authorGary Dismukes <dismukes@adacore.com>
Wed, 1 Apr 2020 16:38:16 +0000 (12:38 -0400)
committerPierre-Marie de Rodat <derodat@adacore.com>
Mon, 15 Jun 2020 08:04:38 +0000 (04:04 -0400)
2020-06-15  Gary Dismukes  <dismukes@adacore.com>

gcc/ada/

* exp_ch9.ads (Build_Master_Declaration): Add commas.
* exp_ch9.adb (Build_Master_Entity): Spelling fix ("build" =>
"built").
(Build_Task_Activation_Call): Fix word order.

gcc/ada/exp_ch9.adb
gcc/ada/exp_ch9.ads

index da6e309..adbaa7b 100644 (file)
@@ -3447,7 +3447,7 @@ package body Exp_Ch9 is
          Find_Enclosing_Context (Par, Context, Context_Id, Decls);
       end if;
 
-      --  Nothing to do if the context already has a master; internally build
+      --  Nothing to do if the context already has a master; internally built
       --  finalizers don't need a master.
 
       if Has_Master_Entity (Context_Id)
@@ -4856,7 +4856,7 @@ package body Exp_Ch9 is
       Chain := Activation_Chain_Entity (Owner);
 
       --  Nothing to do when there are no tasks to activate. This is indicated
-      --  by a missing activation chain entity; skip also generating it when
+      --  by a missing activation chain entity; also skip generating it when
       --  it is a ghost entity.
 
       if No (Chain) or else Is_Ignored_Ghost_Entity (Chain) then
index 3656ac7..59930a6 100644 (file)
@@ -56,9 +56,9 @@ package Exp_Ch9 is
    --  a renaming of the said master to service the access type.
 
    function Build_Master_Declaration (Loc : Source_Ptr) return Node_Id;
-   --  For targets supporting tasks generate:
+   --  For targets supporting tasks, generate:
    --      _Master : constant Integer := Current_Master.all;
-   --  For targets where tasks or tasking hierarchies are prohibited generate:
+   --  For targets where tasks or tasking hierarchies are prohibited, generate:
    --      _Master : constant Master_Id := 3;
 
    procedure Build_Master_Entity (Obj_Or_Typ : Entity_Id);