diff options
| author | Gary Dismukes <dismukes@adacore.com> | 2019-12-16 10:34:08 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2019-12-16 10:34:08 +0000 |
| commit | ba58b776c08cf4c1a7021e60f9ec1f70a8141b1e (patch) | |
| tree | a018d402d7f07ad503f910907dbbe5e3369933f6 /gcc | |
| parent | dce1ef7a34b2b80d02e36ebc464e642a84b15f2d (diff) | |
| download | gcc-ba58b776c08cf4c1a7021e60f9ec1f70a8141b1e.zip gcc-ba58b776c08cf4c1a7021e60f9ec1f70a8141b1e.tar.gz gcc-ba58b776c08cf4c1a7021e60f9ec1f70a8141b1e.tar.bz2 | |
[Ada] Minor reformatting and U.S. spelling adjustment
2019-12-16 Gary Dismukes <dismukes@adacore.com>
gcc/ada/
* checks.adb, sem_util.adb: Minor reformatting and U.S. spelling
adjustment.
From-SVN: r279425
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/checks.adb | 17 | ||||
| -rw-r--r-- | gcc/ada/sem_util.adb | 6 |
3 files changed, 16 insertions, 12 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 88732bd..4af1acd 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2019-12-16 Gary Dismukes <dismukes@adacore.com> + + * checks.adb, sem_util.adb: Minor reformatting and U.S. spelling + adjustment. + 2019-12-16 Bob Duff <duff@adacore.com> * sem_ch10.adb (Analyze_Subunit): Give an error if the subunit diff --git a/gcc/ada/checks.adb b/gcc/ada/checks.adb index 6b910fd..51ef6c0 100644 --- a/gcc/ada/checks.adb +++ b/gcc/ada/checks.adb @@ -2067,15 +2067,14 @@ package body Checks is Apply_Float_Conversion_Check (Ck_Node, Target_Base); Set_Etype (Temp, Target_Base); - -- Note : previously the declaration was inserted above - -- the parent of the conversion, apparently as a small - -- optimization for the subequent traversal in Insert_ - -- Actions. Unfortunately a similar optimization takes - -- place in Insert_Actions, assuming that the insertion - -- point must be above the expression that creates actions. - -- This is not correct in the presence of conditional - -- expressions, where the insertion must be in the - -- list of asctions attached to the current alternative. + -- Note: Previously the declaration was inserted above the parent + -- of the conversion, apparently as a small optimization for the + -- subequent traversal in Insert_Actions. Unfortunately a similar + -- optimization takes place in Insert_Actions, assuming that the + -- insertion point must be above the expression that creates + -- actions. This is not correct in the presence of conditional + -- expressions, where the insertion must be in the list of actions + -- attached to the current alternative. Insert_Action (Par, Make_Object_Declaration (Loc, diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb index 2c4ff68..4c47ec4 100644 --- a/gcc/ada/sem_util.adb +++ b/gcc/ada/sem_util.adb @@ -13790,11 +13790,11 @@ package body Sem_Util is function Is_Atomic_Or_VFA_Object (N : Node_Id) return Boolean is function Is_VFA_Object (N : Node_Id) return Boolean; -- Determine whether arbitrary node N denotes a reference to an object - -- which is Volatile_Full_Access. Modelled on Is_Atomic_Object above. + -- that is Volatile_Full_Access. Modeled on Is_Atomic_Object above. function Is_VFA_Object_Entity (Id : Entity_Id) return Boolean; - -- Determine whether arbitrary entity Id denotes an object which is - -- Volatile_Full_Access. Modelled on Is_Atomic_Object_Entity above. + -- Determine whether arbitrary entity Id denotes an object that is + -- Volatile_Full_Access. Modeled on Is_Atomic_Object_Entity above. --------------------- -- Is_VFA_Object -- |