diff --git a/gcc/ada/sem_ch4.adb b/gcc/ada/sem_ch4.adb index 77f2812ba38..a96ce9ff8f0 100644 --- a/gcc/ada/sem_ch4.adb +++ b/gcc/ada/sem_ch4.adb @@ -10223,7 +10223,7 @@ package body Sem_Ch4 is if Serious_Errors_Detected = 0 then Error_Msg_NE ("cannot resolve prefixed call to primitive operation of&", - N, Entity (Prefix (N))); + N, Entity (Obj)); end if; end if;