diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-08-31 07:58:43 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-08-31 07:58:43 +0200 |
commit | befcd7309285746fdb6c6af2424daf9329f682c1 (patch) | |
tree | e779224a6402082056ba5d4d63f87cc99f1ff142 /src/synth/netlists-builders.ads | |
parent | 6daefbc5e6ffc2da14cca618fd8207e04dff665b (diff) | |
download | ghdl-befcd7309285746fdb6c6af2424daf9329f682c1.tar.gz ghdl-befcd7309285746fdb6c6af2424daf9329f682c1.tar.bz2 ghdl-befcd7309285746fdb6c6af2424daf9329f682c1.zip |
synth: improve synth_uresize.
Diffstat (limited to 'src/synth/netlists-builders.ads')
-rw-r--r-- | src/synth/netlists-builders.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/synth/netlists-builders.ads b/src/synth/netlists-builders.ads index 8aa4501c0..82f05962d 100644 --- a/src/synth/netlists-builders.ads +++ b/src/synth/netlists-builders.ads @@ -60,6 +60,10 @@ package Netlists.Builders is Xz : Uns32; W : Width) return Net; + -- Build a const from VAL. Result is either a Const_UB32 or a Const_Bit. + function Build2_Const_Uns (Ctxt : Context_Acc; Val : Uns64; W : Width) + return Net; + -- Large constants. -- Bit means only 0 or 1. -- Log means 0/1/Z/X. Parameters 2N are aval, 2N+1 are bval. |