From: Piotr Trojanek Date: Fri, 5 Jul 2019 07:02:41 +0000 (+0000) Subject: [Ada] Typo fixes X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=6cc855048364cdfe4960e9f960e619efce6a9e4a;p=gcc.git [Ada] Typo fixes 2019-07-05 Piotr Trojanek gcc/ada/ * einfo.ads, sem_res.adb: Typo fixes in comments. From-SVN: r273114 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 880f2610bf4..0d908617ec2 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2019-07-05 Piotr Trojanek + + * einfo.ads, sem_res.adb: Typo fixes in comments. + 2019-07-05 Bob Duff * exp_ch6.adb (Is_Build_In_Place_Function): Narrow the check for diff --git a/gcc/ada/einfo.ads b/gcc/ada/einfo.ads index 9dc6cc24799..a24856832c6 100644 --- a/gcc/ada/einfo.ads +++ b/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 diff --git a/gcc/ada/sem_res.adb b/gcc/ada/sem_res.adb index 9c226357483..7363abf5b4b 100644 --- a/gcc/ada/sem_res.adb +++ b/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)