[Ada] Analyze second parameter of attribute Scaling

gcc/ada/

	* sem_attr.adb (Analyze_Attribute): Resolve second parameter of
	attribute Scaling just like it is resolved for a similar
	attribute Compose.
This commit is contained in:
Piotr Trojanek 2020-11-23 15:30:06 +01:00 committed by Pierre-Marie de Rodat
parent 7837a887d6
commit a21ec1de4e
1 changed files with 1 additions and 0 deletions

View File

@ -5953,6 +5953,7 @@ package body Sem_Attr is
Check_Floating_Point_Type_2;
Set_Etype (N, P_Base_Type);
Resolve (E1, P_Base_Type);
Resolve (E2, Any_Integer);
------------------
-- Signed_Zeros --