[Ada] Typo fixes

2019-07-05  Piotr Trojanek  <trojanek@adacore.com>

gcc/ada/

	* einfo.ads, sem_res.adb: Typo fixes in comments.

From-SVN: r273114

gcc/ada/ChangeLog

+2019-07-05  Piotr Trojanek  <trojanek@adacore.com>
+
+	* einfo.ads, sem_res.adb: Typo fixes in comments.
+
 2019-07-05  Bob Duff  <duff@adacore.com>
 
 	* exp_ch6.adb (Is_Build_In_Place_Function): Narrow the check for

gcc/ada/einfo.ads

@@ -4490,7 +4490,7 @@ package Einfo is
 --    Suppress_Initialization (Flag105)
 --       Defined in all variable, type and subtype entities. If set for a base
 --       type, then the generation of initialization procedures is suppressed
---       for the type. Any other implicit initialiation (e.g. from the use of
+--       for the type. Any other implicit initialization (e.g. from the use of
 --       pragma Initialize_Scalars) is also suppressed if this flag is set for
 --       either the subtype in question, or for the base type. For variables,
 --       this flag suppresses all implicit initialization for the object, even

gcc/ada/sem_res.adb

@@ -6070,7 +6070,7 @@ package body Sem_Res is
       --  is frozen in the usual fashion, by the appearance of a real body,
       --  or at the end of a declarative part. However an implicit call to
       --  an expression function may appear when it is part of a default
-      --  expression in a call to an initialiation procedure, and must be
+      --  expression in a call to an initialization procedure, and must be
       --  frozen now, even if the body is inserted at a later point.
 
       if Is_Entity_Name (Subp)