[gcc r15-1781] ada: Fix generic renaming table low bound on reset

[Marc Poulhi?s via Gcc-cvs]

https://gcc.gnu.org/g:78fe22892c6dc0f4bfd4e7fc0d2d43a9074c209c

commit r15-1781-g78fe22892c6dc0f4bfd4e7fc0d2d43a9074c209c
Author: Ronan Desplanques <desplanq...@adacore.com>
Date:   Fri Jun 14 17:33:23 2024 +0200

    ada: Fix generic renaming table low bound on reset
    
    gcc/ada/
    
            * sem_ch12.adb (Save_And_Reset): Fix value of low bound used to
            reset table.

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

diff --git a/gcc/ada/sem_ch12.adb b/gcc/ada/sem_ch12.adb
index b93e8231c84..127b521e0a5 100644
--- a/gcc/ada/sem_ch12.adb
+++ b/gcc/ada/sem_ch12.adb
@@ -18095,7 +18095,7 @@ package body Sem_Ch12 is
             end loop;
 
             Generic_Renamings.Init;
-            Generic_Renamings.Set_Last (0);
+            Generic_Renamings.Set_Last (-1);
             Generic_Renamings_HTable.Reset;
          end return;
       end Save_And_Reset;