git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

[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
This commit is contained in:
Gary Dismukes 2019-12-16 10:34:08 +00:00 committed by Pierre-Marie de Rodat
parent dce1ef7a34
commit ba58b776c0
3 changed files with 16 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/ada/ChangeLog
View File

@ -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> 2019-12-16 Bob Duff <duff@adacore.com>
* sem_ch10.adb (Analyze_Subunit): Give an error if the subunit * sem_ch10.adb (Analyze_Subunit): Give an error if the subunit

17
gcc/ada/checks.adb
View File

@ -2067,15 +2067,14 @@ package body Checks is
Apply_Float_Conversion_Check (Ck_Node, Target_Base); Apply_Float_Conversion_Check (Ck_Node, Target_Base);
Set_Etype (Temp, Target_Base); Set_Etype (Temp, Target_Base);
-- Note : previously the declaration was inserted above -- Note: Previously the declaration was inserted above the parent
-- the parent of the conversion, apparently as a small -- of the conversion, apparently as a small optimization for the
-- optimization for the subequent traversal in Insert_ -- subequent traversal in Insert_Actions. Unfortunately a similar
-- Actions. Unfortunately a similar optimization takes -- optimization takes place in Insert_Actions, assuming that the
-- place in Insert_Actions, assuming that the insertion -- insertion point must be above the expression that creates
-- point must be above the expression that creates actions. -- actions. This is not correct in the presence of conditional
-- This is not correct in the presence of conditional -- expressions, where the insertion must be in the list of actions
-- expressions, where the insertion must be in the -- attached to the current alternative.
-- list of asctions attached to the current alternative.
Insert_Action (Par, Insert_Action (Par,
Make_Object_Declaration (Loc, Make_Object_Declaration (Loc,

6
gcc/ada/sem_util.adb
View File

@ -13790,11 +13790,11 @@ package body Sem_Util is
function Is_Atomic_Or_VFA_Object (N : Node_Id) return Boolean is function Is_Atomic_Or_VFA_Object (N : Node_Id) return Boolean is
function Is_VFA_Object (N : Node_Id) return Boolean; function Is_VFA_Object (N : Node_Id) return Boolean;
-- Determine whether arbitrary node N denotes a reference to an object -- 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; function Is_VFA_Object_Entity (Id : Entity_Id) return Boolean;
-- Determine whether arbitrary entity Id denotes an object which is -- Determine whether arbitrary entity Id denotes an object that is
-- Volatile_Full_Access. Modelled on Is_Atomic_Object_Entity above. -- Volatile_Full_Access. Modeled on Is_Atomic_Object_Entity above.
--------------------- ---------------------
-- Is_VFA_Object -- -- Is_VFA_Object --