[gcc/devel/gccgo] [Ada] Add missing warning tag for some overlapping actuals warnings

[Ian Lance Taylor]

https://gcc.gnu.org/g:75c44bc6a04d032e7c4dbce8c8dd652fae7f4ff1

commit 75c44bc6a04d032e7c4dbce8c8dd652fae7f4ff1
Author: Arnaud Charlet <charlet@adacore.com>
Date:   Fri Apr 24 12:17:51 2020 -0400

    [Ada] Add missing warning tag for some overlapping actuals warnings
    
    2020-06-19  Arnaud Charlet  <charlet@adacore.com>
    
    gcc/ada/
    
            * sem_warn.adb (Warn_On_Overlapping_Actuals): Add missing
            warning tag.

Diff:
---
 gcc/ada/sem_warn.adb | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gcc/ada/sem_warn.adb b/gcc/ada/sem_warn.adb
index 5e9c6164131..fe9c46714d6 100644
--- a/gcc/ada/sem_warn.adb
+++ b/gcc/ada/sem_warn.adb
@@ -3854,7 +3854,7 @@ package body Sem_Warn is
                         then
                            if Act1 = First_Actual (N) then
                               Error_Msg_FE
-                                ("<<`IN OUT` prefix overlaps with "
+                                ("<I<`IN OUT` prefix overlaps with "
                                  & "actual for&", Act1, Form2);
 
                            else
@@ -3862,7 +3862,7 @@ package body Sem_Warn is
 
                               Error_Msg_Node_2 := Form2;
                               Error_Msg_FE
-                                ("<<writable actual for & overlaps with "
+                                ("<I<writable actual for & overlaps with "
                                  & "actual for&", Act1, Form2);
                            end if;
 
@@ -3874,7 +3874,7 @@ package body Sem_Warn is
                            --  This is one of the messages
 
                            Error_Msg_FE
-                             ("<<writable actual for & overlaps with "
+                             ("<I<writable actual for & overlaps with "
                               & "actual for&", Act1, Form1);
                         end if;
                      end if;