[gcc(refs/users/guojiufu/heads/guojiufu-branch)] [Ada] Remove suppression for overlapping actuals in internal units

[gcc(refs/users/guojiufu/heads/guojiufu-branch)] [Ada] Remove suppression for overlapping actuals in internal units

[Jiu Fu Guo]

https://gcc.gnu.org/g:879f6fa876b5b66f547a4b426145575433468572

commit 879f6fa876b5b66f547a4b426145575433468572
Author: Piotr Trojanek <trojanek@adacore.com>
Date:   Wed Mar 18 18:25:41 2020 +0100

    [Ada] Remove suppression for overlapping actuals in internal units
    
    2020-06-12  Piotr Trojanek  <trojanek@adacore.com>
    
    gcc/ada/
    
            * sem_warn.adb (Warn_On_Overlapping_Actuals): Remove suppression
            for internal units.

Diff:
---
 gcc/ada/sem_warn.adb | 10 ++--------
 1 file changed, 2 insertions(+), 8 deletions(-)

diff --git a/gcc/ada/sem_warn.adb b/gcc/ada/sem_warn.adb
index 8ca61757031..415aaeed920 100644
--- a/gcc/ada/sem_warn.adb
+++ b/gcc/ada/sem_warn.adb
@@ -3727,19 +3727,13 @@ package body Sem_Warn is
       --  overlapping parameters that are record types or array types.
 
       --  It is also worthwhile to warn on overlaps of composite objects when
-      --  only one of the formals is (in)-out.  Note that the RM rule above is
+      --  only one of the formals is (in)-out. Note that the RM rule above is
       --  a legality rule. We choose to implement this check as a warning to
-      --  avoid major incompatibilities with legacy code. We exclude internal
-      --  sources from the warning, because subprograms in Container libraries
-      --  would be affected by the warning.
+      --  avoid major incompatibilities with legacy code.
 
       --  Note also that the rule in 6.4.1 (6.17/3), introduced by AI12-0324,
       --  is potentially more expensive to verify, and is not yet implemented.
 
-      if Is_Internal_Unit (Current_Sem_Unit) then
-         return;
-      end if;
-
       Form1 := First_Formal (Subp);
       Act1  := First_Actual (N);
       while Present (Form1) and then Present (Act1) loop