diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2023-05-10 00:05:55 +0200 |
|---|---|---|
| committer | Marc Poulhiès <poulhies@adacore.com> | 2023-06-15 09:59:34 +0200 |
| commit | e870d6d73b4f0d24cc1a9d976954b0df836dbd06 (patch) | |
| tree | 4ca4b03a70f79abf67d455ac6ea3f8aa502538de /gcc | |
| parent | 16bd94c81fbba2ce23a88f257db08a3d95fa0ad5 (diff) | |
| download | gcc-e870d6d73b4f0d24cc1a9d976954b0df836dbd06.zip gcc-e870d6d73b4f0d24cc1a9d976954b0df836dbd06.tar.gz gcc-e870d6d73b4f0d24cc1a9d976954b0df836dbd06.tar.bz2 | |
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.
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/sem_type.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_type.adb b/gcc/ada/sem_type.adb index d4006e4..8519b97 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; |