From: Etienne Servais <servais@adacore.com>
Date: Thu, 17 Feb 2022 10:40:46 +0000 (+0100)
Subject: [Ada] Remove superfluous call to Original_Node
X-Git-Tag: basepoints/gcc-14~6680
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=87a655842470b3f764f6809206d1236227c315d3;p=thirdparty%2Fgcc.git

[Ada] Remove superfluous call to Original_Node

The function Same_Object starts by taking the Original_Node of its
arguments.

gcc/ada/

	* sem_ch5.adb (Analyze_Assignment): Remove superfluous call to
	Original_Node.
---

diff --git a/gcc/ada/sem_ch5.adb b/gcc/ada/sem_ch5.adb
index 7fd5ab304f1..633e5c7e543 100644
--- a/gcc/ada/sem_ch5.adb
+++ b/gcc/ada/sem_ch5.adb
@@ -1111,7 +1111,7 @@ package body Sem_Ch5 is
 
          --  Where the object is the same on both sides
 
-         and then Same_Object (Lhs, Original_Node (Rhs))
+         and then Same_Object (Lhs, Rhs)
 
          --  But exclude the case where the right side was an operation that
          --  got rewritten (e.g. JUNK + K, where K was known to be zero). We