[gcc r14-1218] ada: Simplify copying of node lists

[gcc r14-1218] ada: Simplify copying of node lists

[Marc Poulhi?s]

https://gcc.gnu.org/g:c4399ee62946eafbded4334478678d6f3d68787e

commit r14-1218-gc4399ee62946eafbded4334478678d6f3d68787e
Author: Piotr Trojanek <trojanek@adacore.com>
Date:   Tue Mar 7 19:52:40 2023 +0100

    ada: Simplify copying of node lists
    
    When creating a copy of a node list we called Copy_Entity for entities
    and Copy_Separate_Tree for other nodes. This was unnecessary, because
    the Copy_Separate_Tree when called on entities will just do Copy_Entity.
    
    Code cleanup; semantics is unaffected.
    
    gcc/ada/
    
            * atree.adb (Copy_List): Call Copy_Separate_Tree for both entities and
            other nodes.

Diff:
---
 gcc/ada/atree.adb | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/gcc/ada/atree.adb b/gcc/ada/atree.adb
index 1c5b93727cd..ef19a80b6e7 100644
--- a/gcc/ada/atree.adb
+++ b/gcc/ada/atree.adb
@@ -1396,12 +1396,7 @@ package body Atree is
 
             E := First (List);
             while Present (E) loop
-               if Is_Entity (E) then
-                  Append (Copy_Entity (E), NL);
-               else
-                  Append (Copy_Separate_Tree (E), NL);
-               end if;
-
+               Append (Copy_Separate_Tree (E), NL);
                Next (E);
             end loop;