aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/vhdl-sem_decls.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/vhdl-sem_decls.adb')
-rw-r--r--src/vhdl/vhdl-sem_decls.adb3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-sem_decls.adb b/src/vhdl/vhdl-sem_decls.adb
index 0d5a02bad..55cc4b793 100644
--- a/src/vhdl/vhdl-sem_decls.adb
+++ b/src/vhdl/vhdl-sem_decls.adb
@@ -550,11 +550,12 @@ package body Vhdl.Sem_Decls is
Finters : Iir;
Op_Eq, Op_Neq : Iir;
begin
- -- Create type definition.
+ -- Create type definition. The definition is owned by the declaration.
Def := Create_Iir (Iir_Kind_Interface_Type_Definition);
Set_Location (Def, Get_Location (Inter));
Set_Type_Declarator (Def, Inter);
Set_Type (Inter, Def);
+ Set_Interface_Type_Definition (Inter, Def);
Set_Type_Staticness (Def, None);
Set_Resolved_Flag (Def, False);
Set_Signal_Type_Flag (Def, True);