[COMMITTED 02/21] ada: Fix diagnostics inteneded as continuations

[Marc Poulhiès]

From: Viljar Indus <in...@adacore.com>

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.

Tested on x86_64-pc-linux-gnu, committed on master.

---
 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 4b8ea7ed5bc..d5525d7a374 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 fa9f11c3592..fb78b800590 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;
 
          ------------------
-- 
2.53.0