diff options
| -rw-r--r-- | src/vhdl/vhdl-sem_stmts.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-sem_stmts.adb b/src/vhdl/vhdl-sem_stmts.adb index 287f54dab..771a09c3a 100644 --- a/src/vhdl/vhdl-sem_stmts.adb +++ b/src/vhdl/vhdl-sem_stmts.adb @@ -1863,6 +1863,10 @@ package body Vhdl.Sem_Stmts is Comp_Name : Iir; Comp : Iir; begin + if Is_Error (Inst) then + return Null_Iir; + end if; + if Get_Kind (Inst) in Iir_Kinds_Entity_Aspect then return Sem_Entity_Aspect (Inst); else |