aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/vhdl-annotations.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/vhdl-annotations.adb')
-rw-r--r--src/vhdl/vhdl-annotations.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-annotations.adb b/src/vhdl/vhdl-annotations.adb
index f45827edb..af6c3dc64 100644
--- a/src/vhdl/vhdl-annotations.adb
+++ b/src/vhdl/vhdl-annotations.adb
@@ -487,6 +487,7 @@ package body Vhdl.Annotations is
while Decl /= Null_Iir loop
if With_Types
and then Get_Kind (Decl) in Iir_Kinds_Interface_Object_Declaration
+ and then Get_Subtype_Indication (Decl) /= Null_Iir
then
Annotate_Anonymous_Type_Definition (Block_Info, Get_Type (Decl));
end if;