diff options
| author | Ghjuvan Lacambre <lacambre@adacore.com> | 2022-04-26 09:25:52 +0200 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2022-05-30 08:29:03 +0000 |
| commit | f925b56959d8479d7d5e072d1371b6b02870f5c8 (patch) | |
| tree | ec304891729364b2e88d10e6f807a4b0c34c331e | |
| parent | 8337af4f9db8bee0e83995f4280f4123f8af9767 (diff) | |
[Ada] Fix Warn_On_Late_Primitives messages not being properly tagged
This caused tools ingesting GNAT's output to mislabel these messages.
gcc/ada/
* sem_disp.adb (Warn_On_Late_Primitive_After_Private_Extension):
Fix insertion character.
| -rw-r--r-- | gcc/ada/sem_disp.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_disp.adb b/gcc/ada/sem_disp.adb index 0372ff87c33..3e75a47a309 100644 --- a/gcc/ada/sem_disp.adb +++ b/gcc/ada/sem_disp.adb @@ -1207,7 +1207,7 @@ package body Sem_Disp is Error_Msg_Name_2 := Chars (E); Error_Msg_Sloc := Sloc (E); Error_Msg_N - ("?j?primitive of type % defined after private extension " + ("?.j?primitive of type % defined after private extension " & "% #?", Prim); Error_Msg_Name_1 := Chars (Prim); Error_Msg_Name_2 := Chars (E); |