diff options
Diffstat (limited to 'src/simul')
-rw-r--r-- | src/simul/simul-vhdl_simul.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/simul/simul-vhdl_simul.adb b/src/simul/simul-vhdl_simul.adb index 53afa715c..5626813a2 100644 --- a/src/simul/simul-vhdl_simul.adb +++ b/src/simul/simul-vhdl_simul.adb @@ -2742,7 +2742,7 @@ package body Simul.Vhdl_Simul is -- Create the type. Bnd := Elab.Vhdl_Types.Create_Bounds_From_Length (R.Idx_Typ.Drange, Len); - Arr_Typ := Create_Array_Type (Bnd, True, El_Typ); + Arr_Typ := Create_Array_Type (Bnd, False, True, El_Typ); -- Allocate the array. Arr := Create_Memory (Arr_Typ); |