mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-03-28 04:40:26 +08:00
Code Issues Packages Projects Releases Wiki Activity

[Ada] Minor whitespace fix in expansion of attribute Size

Browse Source 
gcc/ada/

	* exp_attr.adb (Expand_Size_Attribute): Remove whitespace;
	simplify with a membership test, which are now allowed in the
	frontend code.
This commit is contained in:
Piotr Trojanek 2020-10-14 15:56:34 +02:00 committed by Pierre-Marie de Rodat
parent 52b9a264dd
commit 14a16e30ca
1 changed files with 7 additions and 7 deletions

2
gcc/ada/exp_attr.adb

@ -7806,7 +7806,7 @@ package body Exp_Attr is
begin
-- Case of known RM_Size of a type
if (Id = Attribute_Size or else Id = Attribute_Value_Size)
if Id in Attribute_Size | Attribute_Value_Size
and then Is_Entity_Name (Pref)
and then Is_Type (Entity (Pref))
and then Known_Static_RM_Size (Entity (Pref))