diff options
author | Etienne Servais <servais@adacore.com> | 2022-02-17 11:40:46 +0100 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2022-05-17 08:25:42 +0000 |
commit | 87a655842470b3f764f6809206d1236227c315d3 (patch) | |
tree | ce3688edd771f3355cd025d72469fe8a8d366fa5 | |
parent | 6c72dc7d602f45d086a9651e623a4e68fa96fab6 (diff) | |
download | gcc-87a655842470b3f764f6809206d1236227c315d3.zip gcc-87a655842470b3f764f6809206d1236227c315d3.tar.gz gcc-87a655842470b3f764f6809206d1236227c315d3.tar.bz2 |
[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.
-rw-r--r-- | gcc/ada/sem_ch5.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_ch5.adb b/gcc/ada/sem_ch5.adb index 7fd5ab3..633e5c7 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 |