[COMMITTED] ada: Fix inverted implementation of RM 8.4(10) clause for operators

Message ID 20230615080358.939037-1-poulhies@adacore.com
State Committed
Commit e870d6d73b4f0d24cc1a9d976954b0df836dbd06
Headers
Series [COMMITTED] ada: Fix inverted implementation of RM 8.4(10) clause for operators |

Commit Message

Marc Poulhiès June 15, 2023, 8:03 a.m. UTC
  From: Eric Botcazou <ebotcazou@adacore.com>

The comment is correct but the code implements the opposite outcome.

gcc/ada/

	* sem_type.adb (Disambiguate): Fix pasto in the implementation of
	the RM 8.4(10) clause for operators.

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

---
 gcc/ada/sem_type.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
  

Patch

diff --git a/gcc/ada/sem_type.adb b/gcc/ada/sem_type.adb
index d4006e4270b..8519b97fa41 100644
--- a/gcc/ada/sem_type.adb
+++ b/gcc/ada/sem_type.adb
@@ -2229,7 +2229,7 @@  package body Sem_Type is
                 Is_Immediately_Visible (Base_Type (Etype (Right_Opnd (N))))
               and then Is_Potentially_Use_Visible (User_Subp)
             then
-               if It2.Nam = Predef_Subp then
+               if It1.Nam = Predef_Subp then
                   return It1;
                else
                   return It2;