aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl')
-rw-r--r--src/vhdl/sem_assocs.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/sem_assocs.adb b/src/vhdl/sem_assocs.adb
index 6bbc67215..bafea5496 100644
--- a/src/vhdl/sem_assocs.adb
+++ b/src/vhdl/sem_assocs.adb
@@ -1854,7 +1854,7 @@ package body Sem_Assocs is
end if;
if Match = Not_Compatible then
- if Finish then
+ if Finish and then not Is_Error (Actual) then
Error_Msg_Sem (+Assoc, "can't associate %n with %n",
(+Actual, +Inter), Cont => True);
Error_Msg_Sem