]> git.ipfire.org Git - thirdparty/gcc.git/commit
ada: Add tags to warnings controlled by Warn_On_Redundant_Constructs
authorPiotr Trojanek <trojanek@adacore.com>
Thu, 23 Feb 2023 23:47:47 +0000 (00:47 +0100)
committerMarc Poulhiès <poulhies@adacore.com>
Tue, 23 May 2023 07:59:07 +0000 (09:59 +0200)
commite77a66ee9a6049c7a6b0d351772ad61be775c447
treed33f505055170baa005557af60bb6b8c8443ddca
parent47a084d96bb880d9c33b6be04aad883f1da2ad62
ada: Add tags to warnings controlled by Warn_On_Redundant_Constructs

Some of the calls to Error_Msg_N controlled by the flag
Warn_On_Redundant_Constructs missed the "?r?" tag in their message
string. This caused a misleading "[enabled by default]" label to appear
next to the error message.

Spotted while adding a warning about duplicated choices in exception
handlers.

gcc/ada/

* freeze.adb (Freeze_Record_Type): Add tag for redundant pragma Pack.
* sem_aggr.adb (Resolve_Record_Aggregate): Add tag for redundant OTHERS
choice.
* sem_ch8.adb (Use_One_Type): Add tag for redundant USE clauses.
gcc/ada/freeze.adb
gcc/ada/sem_aggr.adb
gcc/ada/sem_ch8.adb