diff options
| author | Tristan Gingold <tgingold@free.fr> | 2021-11-09 20:54:19 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2021-11-09 20:54:19 +0100 |
| commit | 96245c0a4df7a6bc07cd8b7c15268c78c459f3b7 (patch) | |
| tree | 8c9aacd46303689492872db13bb71cb2a61ba44a /src/vhdl/vhdl-sem_assocs.adb | |
| parent | 144cedec159574df474579fa2cc7fde7e61eadbc (diff) | |
| download | ghdl-96245c0a4df7a6bc07cd8b7c15268c78c459f3b7.tar.gz ghdl-96245c0a4df7a6bc07cd8b7c15268c78c459f3b7.tar.bz2 ghdl-96245c0a4df7a6bc07cd8b7c15268c78c459f3b7.zip | |
vhdl: Iir_Kind_Foreign_Module is now a library unit
(instead of a design unit).
Also, add Iir_Kind_Foreign_Vector_Type_Definition
Diffstat (limited to 'src/vhdl/vhdl-sem_assocs.adb')
| -rw-r--r-- | src/vhdl/vhdl-sem_assocs.adb | 5 |
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); |