From 95872381f0e22ef13e95788e7000ae2623ed03cd Mon Sep 17 00:00:00 2001 From: Bob Duff Date: Wed, 23 May 2018 10:21:47 +0000 Subject: [PATCH] [Ada] Minor reformatting 2018-05-23 Bob Duff gcc/ada/ * einfo.ads: Minor reformatting. * sem_ch3.adb: Likewise. * sinfo.ads: Likewise. From-SVN: r260573 --- gcc/ada/ChangeLog | 6 ++++++ gcc/ada/einfo.ads | 2 +- gcc/ada/sem_ch3.adb | 2 +- gcc/ada/sinfo.ads | 2 +- 4 files changed, 9 insertions(+), 3 deletions(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 5feb05b664b..98720a392a2 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,9 @@ +2018-05-23 Bob Duff + + * einfo.ads: Minor reformatting. + * sem_ch3.adb: Likewise. + * sinfo.ads: Likewise. + 2018-05-23 Hristian Kirtchev * exp_ch3.adb (Default_Initialize_Object): Do not optimize scalar array diff --git a/gcc/ada/einfo.ads b/gcc/ada/einfo.ads index 76da3b9da6c..8657a97a801 100644 --- a/gcc/ada/einfo.ads +++ b/gcc/ada/einfo.ads @@ -2865,7 +2865,7 @@ package Einfo is -- -- For types and subtypes, the flag is set if all possible bit patterns -- of length Object_Size (i.e. Esize of the type) represent valid values --- of the type. In general for such tytpes, all values are valid, the +-- of the type. In general for such types, all values are valid, the -- only exception being the case where an object of the type has an -- explicit size that is greater than Object_Size. -- diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb index 84e1fec7e4c..747b3cdbfd1 100644 --- a/gcc/ada/sem_ch3.adb +++ b/gcc/ada/sem_ch3.adb @@ -3664,7 +3664,7 @@ package body Sem_Ch3 is function Delayed_Aspect_Present return Boolean; -- If the declaration has an expression that is an aggregate, and it -- has aspects that require delayed analysis, the resolution of the - -- aggregate must be deferred to the freeze point of the objet. This + -- aggregate must be deferred to the freeze point of the object. This -- special processing was created for address clauses, but it must -- also apply to Alignment. This must be done before the aspect -- specifications are analyzed because we must handle the aggregate diff --git a/gcc/ada/sinfo.ads b/gcc/ada/sinfo.ads index c453c281f52..0e53aa9b0eb 100644 --- a/gcc/ada/sinfo.ads +++ b/gcc/ada/sinfo.ads @@ -4136,7 +4136,7 @@ package Sinfo is -- makes no attempt to enforce consistency here, so it is up to the -- semantic phase to make sure that the aggregate is consistent (i.e. -- that it is not a "half-and-half" case that mixes record and array - -- syntax. In particular, for a record aggregate, the expressions + -- syntax). In particular, for a record aggregate, the expressions -- field will be set if there are positional associations. -- Note: N_Aggregate is not used for all aggregates; in particular, -- 2.30.2