aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/vhdl-sem_assocs.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/vhdl-sem_assocs.adb')
-rw-r--r--src/vhdl/vhdl-sem_assocs.adb5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-sem_assocs.adb b/src/vhdl/vhdl-sem_assocs.adb
index 99f5bd168..6d953d7a2 100644
--- a/src/vhdl/vhdl-sem_assocs.adb
+++ b/src/vhdl/vhdl-sem_assocs.adb
@@ -540,6 +540,11 @@ package body Vhdl.Sem_Assocs is
-- Avoid a crash in case of errors.
return True;
end if;
+ if Get_Kind (Src) = Iir_Kind_Foreign_Vector_Type_Definition
+ or else Get_Kind (Dest) = Iir_Kind_Foreign_Vector_Type_Definition
+ then
+ return True;
+ end if;
Src_Range := Get_Range_Constraint (Src);
Dst_Range := Get_Range_Constraint (Dest);