diff options
Diffstat (limited to 'src/synth/elab-vhdl_objtypes.adb')
-rw-r--r-- | src/synth/elab-vhdl_objtypes.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/synth/elab-vhdl_objtypes.adb b/src/synth/elab-vhdl_objtypes.adb index cc13cf2a3..782f4dfa6 100644 --- a/src/synth/elab-vhdl_objtypes.adb +++ b/src/synth/elab-vhdl_objtypes.adb @@ -482,7 +482,7 @@ package body Elab.Vhdl_Objtypes is E : Rec_El_Type renames Els.E (I); begin -- For nets. - E.Boff := W; + E.Offs.Net_Off := W; if E.Typ.Wkind /= Wkind_Net then Wkind := Wkind_Undef; end if; @@ -491,7 +491,7 @@ package body Elab.Vhdl_Objtypes is -- For memory. Al := Palign_Type'Max (Al, E.Typ.Al); Sz := Align (Sz, E.Typ.Al); - E.Moff := Sz; + E.Offs.Mem_Off := Sz; Sz := Sz + E.Typ.Sz; end; end loop; |