OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[Ada] Cleanup code related to object overlays 

gcc/ada/

	* sem_util.adb (Find_Overlaid_Entity): Fix style in comment.
	(Note_Possible_Modification): Simplify repeated calls to Ekind.
This commit is contained in:
Piotr Trojanek 2020-06-05 13:30:54 +02:00 committed by Pierre-Marie de Rodat
parent c2ba82add6
commit 790b1f6415
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/ada/sem_util.adb
View File

@ -8691,7 +8691,7 @@ package body Sem_Util is
Expr := Prefix (Expr);
exit;
-- Check for Const where Const is a constant entity
-- Check for Const where Const is a constant entity
elsif Is_Entity_Name (Expr)
and then Ekind (Entity (Expr)) = E_Constant
@ -23841,7 +23841,7 @@ package body Sem_Util is
-- Follow renaming chain
if (Ekind (Ent) = E_Variable or else Ekind (Ent) = E_Constant)
if Ekind_In (Ent, E_Variable, E_Constant)
and then Present (Renamed_Object (Ent))
then
Exp := Renamed_Object (Ent);