[gcc r14-1845] ada: Fix inverted implementation of RM 8.4(10) clause for operators

Marc Poulhi?s dkm@gcc.gnu.org
Thu Jun 15 08:01:58 GMT 2023


https://gcc.gnu.org/g:e870d6d73b4f0d24cc1a9d976954b0df836dbd06

commit r14-1845-ge870d6d73b4f0d24cc1a9d976954b0df836dbd06
Author: Eric Botcazou <ebotcazou@adacore.com>
Date:   Wed May 10 00:05:55 2023 +0200

    ada: Fix inverted implementation of RM 8.4(10) clause for operators
    
    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.

Diff:
---
 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;


More information about the Gcc-cvs mailing list