diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2022-01-10 20:59:57 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2022-05-09 09:27:29 +0000 |
| commit | a72fd98bf5f1e57fa2ebbacff832bd4f753fd874 (patch) | |
| tree | 2c1dc449fdb8e9455ae9b0b62275b8226a15b476 /gcc | |
| parent | 8e13160b101177b4d0783934d39aab2e2c7b50d9 (diff) | |
| download | gcc-a72fd98bf5f1e57fa2ebbacff832bd4f753fd874.zip gcc-a72fd98bf5f1e57fa2ebbacff832bd4f753fd874.tar.gz gcc-a72fd98bf5f1e57fa2ebbacff832bd4f753fd874.tar.bz2 | |
[Ada] Remove redundant call to Set_Etype for attribute Bit_Order
Node created by a call to New_Occurrence_Of (RTE (...), ...) has its
Etype set. There is no need to follow it with a call to Set_Etype.
Cleanup of various Analyze/Resolve routines.
gcc/ada/
* sem_attr.adb (Analyze_Attribute): Don't call Set_Etype for
Bit_Order attribute.
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/sem_attr.adb | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/gcc/ada/sem_attr.adb b/gcc/ada/sem_attr.adb index 33179aa..ca841d3 100644 --- a/gcc/ada/sem_attr.adb +++ b/gcc/ada/sem_attr.adb @@ -3421,7 +3421,6 @@ package body Sem_Attr is New_Occurrence_Of (RTE (RE_Low_Order_First), Loc)); end if; - Set_Etype (N, RTE (RE_Bit_Order)); Resolve (N); -- Reset incorrect indication of staticness |