diff options
Diffstat (limited to 'gcc/ada/exp_ch13.adb')
-rw-r--r-- | gcc/ada/exp_ch13.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_ch13.adb b/gcc/ada/exp_ch13.adb index 3ba47ec4446..4d2967bbf0f 100644 --- a/gcc/ada/exp_ch13.adb +++ b/gcc/ada/exp_ch13.adb @@ -299,7 +299,7 @@ package body Exp_Ch13 is -- its secondary dispatch table and therefore the code generator -- has nothing else to do with this freezing node. - Delete := Present (Abstract_Interface_Alias (E)); + Delete := Present (Interface_Alias (E)); end if; -- Analyze actions generated by freezing. The init_proc contains source |