diff options
Diffstat (limited to 'src/synth/synth-vhdl_stmts.adb')
| -rw-r--r-- | src/synth/synth-vhdl_stmts.adb | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/synth/synth-vhdl_stmts.adb b/src/synth/synth-vhdl_stmts.adb index 7d0c0b805..05f6ef8fd 100644 --- a/src/synth/synth-vhdl_stmts.adb +++ b/src/synth/synth-vhdl_stmts.adb @@ -118,7 +118,9 @@ package body Synth.Vhdl_Stmts is | Iir_Kind_File_Declaration | Iir_Kind_Interface_File_Declaration | Iir_Kind_Non_Object_Alias_Declaration - | Iir_Kind_Object_Alias_Declaration => + | Iir_Kind_Object_Alias_Declaration + | Iir_Kind_Free_Quantity_Declaration + | Iir_Kind_Dot_Attribute => declare Targ : constant Valtyp := Get_Value (Syn_Inst, Pfx); begin @@ -344,7 +346,8 @@ package body Synth.Vhdl_Stmts is | Iir_Kind_Object_Alias_Declaration | Iir_Kind_Indexed_Name | Iir_Kind_Slice_Name - | Iir_Kind_Dereference => + | Iir_Kind_Dereference + | Iir_Kind_Dot_Attribute => declare Base : Valtyp; Typ : Type_Acc; |