From: Eric Botcazou <ebotca...@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(-)
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;
--
2.40.0
