diff options
Diffstat (limited to 'src/synth/synth-vhdl_expr.ads')
| -rw-r--r-- | src/synth/synth-vhdl_expr.ads | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/src/synth/synth-vhdl_expr.ads b/src/synth/synth-vhdl_expr.ads index 0aacd8cbf..5eadb879f 100644 --- a/src/synth/synth-vhdl_expr.ads +++ b/src/synth/synth-vhdl_expr.ads @@ -90,11 +90,19 @@ package Synth.Vhdl_Expr is Expr : Node; Expr_Type : Type_Acc) return Valtyp; + -- For value signal attribute (like 'Event). + type Hook_Signal_Attribute_Acc is access + function (Syn_Inst : Synth_Instance_Acc; Expr : Node) return Valtyp; + Hook_Signal_Attribute : Hook_Signal_Attribute_Acc; + -- Use base type of EXPR to synthesize EXPR. Useful when the type of -- EXPR is defined by itself or a range. function Synth_Expression_With_Basetype (Syn_Inst : Synth_Instance_Acc; Expr : Node) return Valtyp; + function Synth_Type_Conversion + (Syn_Inst : Synth_Instance_Acc; Conv : Node) return Valtyp; + function Synth_PSL_Expression (Syn_Inst : Synth_Instance_Acc; Expr : PSL.Types.PSL_Node) return Net; @@ -115,6 +123,7 @@ package Synth.Vhdl_Expr is procedure Synth_Indexed_Name (Syn_Inst : Synth_Instance_Acc; Name : Node; Pfx_Type : Type_Acc; + El_Typ : out Type_Acc; Voff : out Net; Off : out Value_Offsets; Error : out Boolean); |