https://gcc.gnu.org/g:4ed963a52a0a7349f0beb765ee0802857d1752eb
commit r15-676-g4ed963a52a0a7349f0beb765ee0802857d1752eb Author: Piotr Trojanek <troja...@adacore.com> Date: Mon Mar 25 22:50:47 2024 +0100 ada: Remove repeated condition in check for implementation attributes Code cleanup; semantics is unaffected. gcc/ada/ * sem_attr.adb (Analyze_Attribute): Remove condition that is already checked by an enclosing IF statement. Diff: --- gcc/ada/sem_attr.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/ada/sem_attr.adb b/gcc/ada/sem_attr.adb index 2b22cf13ad00..6c32d201c55c 100644 --- a/gcc/ada/sem_attr.adb +++ b/gcc/ada/sem_attr.adb @@ -3225,7 +3225,7 @@ package body Sem_Attr is if Comes_From_Source (N) then if not Attribute_83 (Attr_Id) then - if Ada_Version = Ada_83 and then Comes_From_Source (N) then + if Ada_Version = Ada_83 then Error_Msg_Name_1 := Aname; Error_Msg_N ("(Ada 83) attribute% is not standard??", N); end if;