[gcc r15-193] ada: Spurious reference warning on qualified expression

[Marc Poulhi?s via Gcc-cvs]

https://gcc.gnu.org/g:c8cf8c3fd0793e1d7ba8c6d0e906384f4fd9170c

commit r15-193-gc8cf8c3fd0793e1d7ba8c6d0e906384f4fd9170c
Author: Justin Squirek <squi...@adacore.com>
Date:   Thu Dec 21 18:41:15 2023 +0000

    ada: Spurious reference warning on qualified expression
    
    Incremental improvement/clean up.
    
    gcc/ada/
    
            * sem_warn.adb (Within_Postcondition): Add coverage for
            Preconditions

Diff:
---
 gcc/ada/sem_warn.adb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gcc/ada/sem_warn.adb b/gcc/ada/sem_warn.adb
index 54d8920a943..57bdee65356 100644
--- a/gcc/ada/sem_warn.adb
+++ b/gcc/ada/sem_warn.adb
@@ -1978,7 +1978,8 @@ package body Sem_Warn is
                            if Nkind (Nod) = N_Pragma
                              and then
                                Pragma_Name_Unmapped (Nod)
-                                in Name_Postcondition
+                                in Name_Precondition
+                                 | Name_Postcondition
                                  | Name_Refined_Post
                                  | Name_Contract_Cases
                            then