mirror of
https://gcc.gnu.org/git/gcc.git
synced 2024-12-21 01:55:15 +08:00
[Ada] Remove left-overs of Unaligned_Valid attribute
gcc/ada/ * exp_attr.adb (Expand_Fpt_Attribute): Likewise. * snames.ads-tmpl (Name_Unaligned_Valid): Delete.
This commit is contained in:
parent
2f22e8d396
commit
c46dffc657
@ -165,8 +165,7 @@ package body Exp_Attr is
|
||||
-- the appropriate instantiation of System.Fat_Gen. Float arguments in Args
|
||||
-- have already been converted to the floating-point type for which Pkg was
|
||||
-- instantiated. The Nam argument is the relevant attribute processing
|
||||
-- routine to be called. This is the same as the attribute name, except in
|
||||
-- the Unaligned_Valid case.
|
||||
-- routine to be called. This is the same as the attribute name.
|
||||
|
||||
procedure Expand_Fpt_Attribute_R (N : Node_Id);
|
||||
-- This procedure expands a call to a floating-point attribute function
|
||||
|
@ -1400,7 +1400,6 @@ package Snames is
|
||||
-- Note that the UP_ prefix means use the rest of the name in uppercase,
|
||||
-- e.g. Name_UP_RESULT corresponds to the name "RESULT".
|
||||
|
||||
Name_Unaligned_Valid : constant Name_Id := N + $;
|
||||
Name_UP_RESULT : constant Name_Id := N + $;
|
||||
Name_Suspension_Object : constant Name_Id := N + $;
|
||||
Name_Synchronous_Task_Control : constant Name_Id := N + $;
|
||||
|
Loading…
Reference in New Issue
Block a user