From a7d9aa91b5a9f4847edf71c80b70cfec6d646fd9 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Tue, 1 Oct 2019 06:09:55 +0200 Subject: synth: improve support of arrays or arrays. Fix #955 --- src/synth/synth-expr.ads | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'src/synth/synth-expr.ads') 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; -- cgit v1.2.3