https://gcc.gnu.org/g:f1709128827ed374a95b341b62233c50a3e5f902
commit r17-1634-gf1709128827ed374a95b341b62233c50a3e5f902 Author: Viljar Indus <[email protected]> Date: Thu May 28 15:26:12 2026 +0300 ada: Fix diagnostics inteneded as continuations The diagnostic messages fixed here were using the | insertion character instead of the \ used for continuations. Even though they were clearly intended to supplement the previous message. gcc/ada/ChangeLog: * restrict.adb (Process_Restriction_Synonyms): Fix continuation message. * sem_prag.adb (Analyze_Pragma): Likewise. Diff: --- gcc/ada/restrict.adb | 2 +- gcc/ada/sem_prag.adb | 8 ++++---- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/gcc/ada/restrict.adb b/gcc/ada/restrict.adb index 4b8ea7ed5bc9..d5525d7a374b 100644 --- a/gcc/ada/restrict.adb +++ b/gcc/ada/restrict.adb @@ -1049,7 +1049,7 @@ package body Restrict is Error_Msg_Name_1 := Old_Name; Error_Msg_N ("restriction identifier % is obsolescent?j?", N); Error_Msg_Name_1 := New_Name; - Error_Msg_N ("|use restriction identifier % instead?j?", N); + Error_Msg_N ("\use restriction identifier % instead?j?", N); end if; return New_Name; diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb index fa9f11c35923..fb78b800590d 100644 --- a/gcc/ada/sem_prag.adb +++ b/gcc/ada/sem_prag.adb @@ -20746,7 +20746,7 @@ package body Sem_Prag is Error_Msg_N ("pragma Interface is an obsolescent feature?j?", N); Error_Msg_N - ("|use pragma Import instead?j?", N); + ("\use pragma Import instead?j?", N); end if; end if; @@ -20783,7 +20783,7 @@ package body Sem_Prag is Error_Msg_N ("pragma Interface_Name is an obsolescent feature?j?", N); Error_Msg_N - ("|use pragma Import instead?j?", N); + ("\use pragma Import instead?j?", N); end if; end if; @@ -25572,7 +25572,7 @@ package body Sem_Prag is Error_Msg_N ("pragma Ravenscar is an obsolescent feature?j?", N); Error_Msg_N - ("|use pragma Profile (Ravenscar) instead?j?", N); + ("\use pragma Profile (Ravenscar) instead?j?", N); end if; ------------------------- @@ -25593,7 +25593,7 @@ package body Sem_Prag is ("pragma Restricted_Run_Time is an obsolescent feature?j?", N); Error_Msg_N - ("|use pragma Profile (Restricted) instead?j?", N); + ("\use pragma Profile (Restricted) instead?j?", N); end if; ------------------
