[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:
parent
7837a887d6
commit
a21ec1de4e
|
@ -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 --
|
||||
|
|
Loading…
Reference in New Issue