diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-09-17 02:16:28 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-09-17 02:16:28 +0200 |
commit | b3a28203e95f68bd1007c4c11b44187ecabbf593 (patch) | |
tree | 114e02aa47dae4a5776692b81daeed24d25df97d /src/synth/synth-expr.ads | |
parent | 2ab83662516b7466e1870548cb8906e0842bb3ca (diff) | |
download | ghdl-b3a28203e95f68bd1007c4c11b44187ecabbf593.tar.gz ghdl-b3a28203e95f68bd1007c4c11b44187ecabbf593.tar.bz2 ghdl-b3a28203e95f68bd1007c4c11b44187ecabbf593.zip |
synth: fold addition on constant nets.
Diffstat (limited to 'src/synth/synth-expr.ads')
-rw-r--r-- | src/synth/synth-expr.ads | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/synth/synth-expr.ads b/src/synth/synth-expr.ads index 835da87ab..5ce27e49b 100644 --- a/src/synth/synth-expr.ads +++ b/src/synth/synth-expr.ads @@ -36,6 +36,8 @@ package Synth.Expr is (Val : Value_Acc; Dtype : Type_Acc; Loc : Source.Syn_Src) return Value_Acc; + function Get_Const_Discrete (V : Value_Acc) return Int64; + procedure From_Std_Logic (Enum : Int64; Val : out Uns32; Zx : out Uns32); procedure From_Bit (Enum : Int64; Val : out Uns32); procedure To_Logic |