https://gcc.gnu.org/g:b947e309e8736933ee4b31700df2d0d7b9d9ea6a
commit r17-4599-gb947e309e8736933ee4b31700df2d0d7b9d9ea6a Author: Eric Botcazou <[email protected]> Date: Wed Sep 23 11:10:49 2026 +0200 Ada: Fix wrong ALI xref for entry call parameter The wrong name is passed to Generate_Reference from Resolve_Entry. gcc/ada/ * sem_res.adb (Resolve_Entry): Fix thinko. Diff: --- gcc/ada/sem_res.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/ada/sem_res.adb b/gcc/ada/sem_res.adb index c124b6d0e3d3..cf603b5a21f2 100644 --- a/gcc/ada/sem_res.adb +++ b/gcc/ada/sem_res.adb @@ -8385,7 +8385,7 @@ package body Sem_Res is -- Generate a reference for the index when it denotes an entity if Is_Entity_Name (Index) then - Generate_Reference (Entity (Index), Nam); + Generate_Reference (Entity (Index), Index); end if; -- Up to this point the expression could have been the actual in a
