diff options
Diffstat (limited to 'sem_expr.adb')
| -rw-r--r-- | sem_expr.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/sem_expr.adb b/sem_expr.adb index a0ec9b76f..43be15a37 100644 --- a/sem_expr.adb +++ b/sem_expr.adb @@ -3767,7 +3767,7 @@ package body Sem_Expr is if Res /= Null_Iir and then Is_Overloaded (Res) then Error_Overload (Expr); - Disp_Overload_List (Get_Overload_List (Res), Expr); + Disp_Overload_List (Get_Overload_List (Get_Type (Res)), Expr); return Null_Iir; end if; return Res; |