diff options
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/ada/sem_aggr.adb | 2 | ||||
-rw-r--r-- | gcc/ada/sem_ch3.adb | 2 | ||||
-rw-r--r-- | gcc/ada/sem_elim.adb | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/sem_aggr.adb b/gcc/ada/sem_aggr.adb index 5fa1051..5963d03 100644 --- a/gcc/ada/sem_aggr.adb +++ b/gcc/ada/sem_aggr.adb @@ -5031,7 +5031,7 @@ package body Sem_Aggr is if Present (Get_Value (Component, Component_Associations (N))) then Error_Msg_NE - ("more than one value supplied for Component &", N, Component); + ("more than one value supplied for component &", N, Component); end if; Next (Positional_Expr); diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb index deec92c..6a86efd 100644 --- a/gcc/ada/sem_ch3.adb +++ b/gcc/ada/sem_ch3.adb @@ -1777,7 +1777,7 @@ package body Sem_Ch3 is elsif not Comes_From_Source (Prim) then Error_Msg_NE ("&inherits non-conforming preconditions and must " - & "be overridden (RM 6.1.1 (10-16)", + & "be overridden (RM 6.1.1 (10-16))", Parent (Tagged_Type), Prim); end if; end if; diff --git a/gcc/ada/sem_elim.adb b/gcc/ada/sem_elim.adb index d693a8d..62e9fc0 100644 --- a/gcc/ada/sem_elim.adb +++ b/gcc/ada/sem_elim.adb @@ -783,7 +783,7 @@ package body Sem_Elim is and then Is_Concurrent_Record_Type (Etype (First_Entity (E))) then Error_Msg_NE - ("cannot reference eliminated protected subprogram", N, E); + ("cannot reference eliminated protected subprogram&", N, E); -- Otherwise should not fall through, entry should be in table |