diff options
Diffstat (limited to 'gcc/ada/a-except-2005.adb')
| -rw-r--r-- | gcc/ada/a-except-2005.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/a-except-2005.adb b/gcc/ada/a-except-2005.adb index 72396969c12..cbf1e4deb89 100644 --- a/gcc/ada/a-except-2005.adb +++ b/gcc/ada/a-except-2005.adb @@ -588,8 +588,8 @@ package body Ada.Exceptions is Rmsg_16 : constant String := "attempt to take address of" & " intrinsic subprogram" & NUL; Rmsg_17 : constant String := "all guards closed" & NUL; - Rmsg_18 : constant String := "attribute not allowed for " & - " generic subtype with predicate" & NUL; + Rmsg_18 : constant String := "improper use of generic subtype" & + " with predicate" & NUL; Rmsg_19 : constant String := "Current_Task referenced in entry" & " body" & NUL; Rmsg_20 : constant String := "duplicated entry address" & NUL; |