[Ada] Minor fix typo in comment
authorPiotr Trojanek <trojanek@adacore.com>
Fri, 13 Dec 2019 09:04:53 +0000 (09:04 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Fri, 13 Dec 2019 09:04:53 +0000 (09:04 +0000)
2019-12-13  Piotr Trojanek  <trojanek@adacore.com>

gcc/ada/

* exp_aggr.adb, exp_unst.adb: Minor fix typo in comment.

From-SVN: r279358

gcc/ada/ChangeLog
gcc/ada/exp_aggr.adb
gcc/ada/exp_unst.adb

index c920c2c3e1ee5495306fe625ea61793955d988df..9af0c438509dc20e4df65480720210d99d332acf 100644 (file)
@@ -1,3 +1,7 @@
+2019-12-13  Piotr Trojanek  <trojanek@adacore.com>
+
+       * exp_aggr.adb, exp_unst.adb: Minor fix typo in comment.
+
 2019-12-13  Steve Baird  <baird@adacore.com>
 
        * sem_res.adb (Resolve, Valid_Conversion): Add Base_Type call
index 3d3dd1b83416b11d890585c9c1d34ffacee3174d..60ad4d6297ef973e34c3fbb48ce19d82f88c8b42 100644 (file)
@@ -7499,7 +7499,7 @@ package body Exp_Aggr is
          return;
       end if;
 
-      --  If the pramga Aggregate_Individually_Assign is set, always convert to
+      --  If the pragma Aggregate_Individually_Assign is set, always convert to
       --  assignments.
 
       if Aggregate_Individually_Assign then
index 6c1eb4b5a55b59b48e7e69aa884398915153ab9f..5347a7f99b42c3b2f2b4111bd44089b9480a47a7 100644 (file)
@@ -1801,7 +1801,7 @@ package body Exp_Unst is
                      Comp  : Entity_Id;
 
                      Decl_Assign : Node_Id;
-                     --  Assigment to set uplink, Empty if none
+                     --  Assignment to set uplink, Empty if none
 
                      Decl_ARECnT  : Node_Id;
                      Decl_ARECnPT : Node_Id;