[COMMITTED] ada: Simplify copying of node lists

Message ID 20230525080601.1956918-1-poulhies@adacore.com
State Accepted
Headers
Series [COMMITTED] ada: Simplify copying of node lists |

Checks

Context Check Description
snail/gcc-patch-check success Github commit url

Commit Message

Marc Poulhiès May 25, 2023, 8:06 a.m. UTC
  From: Piotr Trojanek <trojanek@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(-)
  

Patch

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;