aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPiotr Trojanek <trojanek@adacore.com>2023-03-31 13:01:06 +0200
committerMarc Poulhiès <poulhies@adacore.com>2023-05-29 10:23:18 +0200
commitedb66b5f4d33363e1e5c0a74fcf2b4734093f508 (patch)
treee214800b14afc6b7653773e519a8cd893168117a
parent833f91bb67700571e03095d4cb0a5055372cff4d (diff)
downloadgcc-edb66b5f4d33363e1e5c0a74fcf2b4734093f508.zip
gcc-edb66b5f4d33363e1e5c0a74fcf2b4734093f508.tar.gz
gcc-edb66b5f4d33363e1e5c0a74fcf2b4734093f508.tar.bz2
ada: Tune message for pre/post on access-to-subprogram in old Ada
Fix grammar in error message; make it consistent with a similar message for pre/postcondition on formal subprogram. gcc/ada/ * sem_prag.adb (Analyze_Pre_Post_Condition): Tune error message.
-rw-r--r--gcc/ada/sem_prag.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb
index 88dacf5..b74c60c 100644
--- a/gcc/ada/sem_prag.adb
+++ b/gcc/ada/sem_prag.adb
@@ -5245,7 +5245,7 @@ package body Sem_Prag is
then
if Ada_Version < Ada_2022 then
Error_Msg_Ada_2022_Feature
- ("pre/postcondition access-to-subprogram", Loc);
+ ("pre/postcondition on access-to-subprogram", Loc);
raise Pragma_Exit;
end if;