diff options
| -rw-r--r-- | src/vhdl/sem_decls.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/sem_decls.adb b/src/vhdl/sem_decls.adb index 122bcf17e..e3d0480c4 100644 --- a/src/vhdl/sem_decls.adb +++ b/src/vhdl/sem_decls.adb @@ -1691,7 +1691,7 @@ package body Sem_Decls is Ind := Sem_Subtype_Indication (Ind); Set_Subtype_Indication (Decl, Ind); Def := Get_Type_Of_Subtype_Indication (Ind); - if Def = Null_Iir then + if Def = Null_Iir or else Is_Error (Def) then return; end if; |