aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJustin Squirek <squirek@adacore.com>2023-12-21 18:41:15 +0000
committerMarc Poulhiès <poulhies@adacore.com>2024-05-06 11:11:30 +0200
commitc8cf8c3fd0793e1d7ba8c6d0e906384f4fd9170c (patch)
tree4b5c1b3787ca77ff7683e0d6fd79a992972668d8
parent6bcda3e0d7559b643f3c18f28e254ea8cb89d2b4 (diff)
downloadgcc-c8cf8c3fd0793e1d7ba8c6d0e906384f4fd9170c.zip
gcc-c8cf8c3fd0793e1d7ba8c6d0e906384f4fd9170c.tar.gz
gcc-c8cf8c3fd0793e1d7ba8c6d0e906384f4fd9170c.tar.bz2
ada: Spurious reference warning on qualified expression
Incremental improvement/clean up. gcc/ada/ * sem_warn.adb (Within_Postcondition): Add coverage for Preconditions
-rw-r--r--gcc/ada/sem_warn.adb3
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/sem_warn.adb b/gcc/ada/sem_warn.adb
index 54d8920..57bdee6 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