[COMMITTED,12/13] ada: Fix generic renaming table low bound on reset
Checks
Commit Message
From: Ronan Desplanques <desplanques@adacore.com>
gcc/ada/
* sem_ch12.adb (Save_And_Reset): Fix value of low bound used to
reset table.
Tested on x86_64-pc-linux-gnu, committed on master.
---
gcc/ada/sem_ch12.adb | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
@@ -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;