aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/vhdl/vhdl-sem_expr.adb8
1 files changed, 7 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-sem_expr.adb b/src/vhdl/vhdl-sem_expr.adb
index e434ce0c1..59159feff 100644
--- a/src/vhdl/vhdl-sem_expr.adb
+++ b/src/vhdl/vhdl-sem_expr.adb
@@ -1973,7 +1973,13 @@ package body Vhdl.Sem_Expr is
Free_Iir (Overload);
Overload := Get_Type (Expr);
Free_Overload_List (Overload);
- return Set_Uniq_Interpretation (Full_Compat);
+ if Full_Compat = Null_Iir then
+ Error_Msg_Sem (+Expr,
+ "no matching function declarations for %n", +Expr);
+ return Null_Iir;
+ else
+ return Set_Uniq_Interpretation (Full_Compat);
+ end if;
end if;
end Sem_Operator;