diff options
| author | Tristan Gingold <tgingold@free.fr> | 2022-05-22 09:09:14 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2022-05-22 09:09:14 +0200 |
| commit | 946320e0984df406f0e3c50cd3db0fb49df5ec9b (patch) | |
| tree | 97d51eff8e649cacf5ad081f7dd9258553ddb2b2 /src/synth/elab-vhdl_objtypes.ads | |
| parent | c56080fed0b46083cf138962c5bb125ea08bfa0e (diff) | |
| download | ghdl-946320e0984df406f0e3c50cd3db0fb49df5ec9b.tar.gz ghdl-946320e0984df406f0e3c50cd3db0fb49df5ec9b.tar.bz2 ghdl-946320e0984df406f0e3c50cd3db0fb49df5ec9b.zip | |
synth: merge value for type_vector and type_array
Diffstat (limited to 'src/synth/elab-vhdl_objtypes.ads')
| -rw-r--r-- | src/synth/elab-vhdl_objtypes.ads | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/src/synth/elab-vhdl_objtypes.ads b/src/synth/elab-vhdl_objtypes.ads index d7f246d8e..c9f1a4894 100644 --- a/src/synth/elab-vhdl_objtypes.ads +++ b/src/synth/elab-vhdl_objtypes.ads @@ -140,18 +140,16 @@ package Elab.Vhdl_Objtypes is Drange : Discrete_Range_Type; when Type_Float => Frange : Float_Range_Type; - when Type_Vector => - Vbound : Bound_Type; - Vec_El : Type_Acc; - when Type_Unbounded_Vector => - Uvec_El : Type_Acc; - Uvec_Idx1 : Type_Acc; when Type_Slice => Slice_El : Type_Acc; - when Type_Array => + when Type_Array + | Type_Vector => Abound : Bound_Type; Alast : Boolean; -- True for the last dimension Arr_El : Type_Acc; + when Type_Unbounded_Vector => + Uvec_El : Type_Acc; + Uvec_Idx1 : Type_Acc; when Type_Unbounded_Array => Uarr_Ndim : Dim_Type; Uarr_El : Type_Acc; |