diff options
Diffstat (limited to 'src/vhdl/vhdl-sem_assocs.adb')
| -rw-r--r-- | src/vhdl/vhdl-sem_assocs.adb | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/src/vhdl/vhdl-sem_assocs.adb b/src/vhdl/vhdl-sem_assocs.adb index 20b8f5c09..ee85fc0f9 100644 --- a/src/vhdl/vhdl-sem_assocs.adb +++ b/src/vhdl/vhdl-sem_assocs.adb @@ -2679,8 +2679,12 @@ package body Vhdl.Sem_Assocs is when Missing_Allowed => null; end case; - when Iir_Kind_Interface_Package_Declaration - | Iir_Kind_Interface_Function_Declaration + when Iir_Kind_Interface_Package_Declaration => + if Get_Generic_Map_Aspect_Chain (Inter) = Null_Iir then + Error_Msg_Sem (+Loc, "%n must be associated", +Inter); + Match := Not_Compatible; + end if; + when Iir_Kind_Interface_Function_Declaration | Iir_Kind_Interface_Procedure_Declaration => Error_Msg_Sem (+Loc, "%n must be associated", +Inter); Match := Not_Compatible; |