diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-10-01 06:09:55 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-10-01 06:09:55 +0200 |
commit | a7d9aa91b5a9f4847edf71c80b70cfec6d646fd9 (patch) | |
tree | 84f3c18584169d3582efe6a3f2a6bdb1b024f47a /src/synth/synth-expr.ads | |
parent | bb00cae25caff518b54c28ba8cc6ee7381fdf2ac (diff) | |
download | ghdl-a7d9aa91b5a9f4847edf71c80b70cfec6d646fd9.tar.gz ghdl-a7d9aa91b5a9f4847edf71c80b70cfec6d646fd9.tar.bz2 ghdl-a7d9aa91b5a9f4847edf71c80b70cfec6d646fd9.zip |
synth: improve support of arrays or arrays. Fix #955
Diffstat (limited to 'src/synth/synth-expr.ads')
-rw-r--r-- | src/synth/synth-expr.ads | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/synth/synth-expr.ads b/src/synth/synth-expr.ads index dbe092434..92104fc75 100644 --- a/src/synth/synth-expr.ads +++ b/src/synth/synth-expr.ads @@ -41,6 +41,9 @@ package Synth.Expr is function Get_Const_Discrete (V : Value_Acc) return Int64; + function Create_Onedimensional_Array_Subtype + (Btyp : Type_Acc; Bnd : Bound_Type) return Type_Acc; + procedure From_Std_Logic (Enum : Int64; Val : out Uns32; Zx : out Uns32); procedure From_Bit (Enum : Int64; Val : out Uns32); procedure To_Logic @@ -98,7 +101,7 @@ package Synth.Expr is Res_Bnd : out Bound_Type; Inp : out Net; Step : out Uns32; - Off : out Int32; + Off : out Uns32; Wd : out Uns32); procedure Synth_Indexed_Name (Syn_Inst : Synth_Instance_Acc; |