From: Piotr Trojanek <troja...@adacore.com>

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.

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

---
 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;
 
-- 
2.40.0

Reply via email to