diff options
Diffstat (limited to 'src/synth/elab-vhdl_heap.adb')
-rw-r--r-- | src/synth/elab-vhdl_heap.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/synth/elab-vhdl_heap.adb b/src/synth/elab-vhdl_heap.adb index 8b125c589..8e89d9387 100644 --- a/src/synth/elab-vhdl_heap.adb +++ b/src/synth/elab-vhdl_heap.adb @@ -63,7 +63,7 @@ package body Elab.Vhdl_Heap is Obj_Typ : Type_Acc; Res : out Memory_Ptr) is - Typ_Sz : constant Size_Type := Acc_Typ.Acc_Bnd_Sz; + Typ_Sz : constant Size_Type := Acc_Typ.Acc_Type_Sz; E : Heap_Entry; begin pragma Assert (Acc_Typ.Kind = Type_Access); |