diff options
author | Piotr Trojanek <trojanek@adacore.com> | 2019-07-05 07:02:41 +0000 |
---|---|---|
committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2019-07-05 07:02:41 +0000 |
commit | 6cc855048364cdfe4960e9f960e619efce6a9e4a (patch) | |
tree | edbbfaabc0bbcaa843ba76680564068db17752dc | |
parent | adc81ec81db382128869cd62ca4e48bd87d1d880 (diff) | |
download | gcc-6cc855048364cdfe4960e9f960e619efce6a9e4a.zip gcc-6cc855048364cdfe4960e9f960e619efce6a9e4a.tar.gz gcc-6cc855048364cdfe4960e9f960e619efce6a9e4a.tar.bz2 |
[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
-rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/ada/einfo.ads | 2 | ||||
-rw-r--r-- | gcc/ada/sem_res.adb | 2 |
3 files changed, 6 insertions, 2 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 880f261..0d90861 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +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 diff --git a/gcc/ada/einfo.ads b/gcc/ada/einfo.ads index 9dc6cc2..a248568 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 9c22635..7363abf 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) |