diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-05-02 07:59:09 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-05-02 07:59:09 +0200 |
commit | aeb47655ddfed9d3fd85c4986d21a60f83b9a8c6 (patch) | |
tree | aa27d773849c84fffd2fd25bb0893b1bc0ebe7ef /src/synth/synth-objtypes.ads | |
parent | e98cc23b32e85d7f31ca6427d40c33df70749238 (diff) | |
download | ghdl-aeb47655ddfed9d3fd85c4986d21a60f83b9a8c6.tar.gz ghdl-aeb47655ddfed9d3fd85c4986d21a60f83b9a8c6.tar.bz2 ghdl-aeb47655ddfed9d3fd85c4986d21a60f83b9a8c6.zip |
synth: use static values for control nets when possible.
Diffstat (limited to 'src/synth/synth-objtypes.ads')
-rw-r--r-- | src/synth/synth-objtypes.ads | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/synth/synth-objtypes.ads b/src/synth/synth-objtypes.ads index c79a473c4..91ffcc32e 100644 --- a/src/synth/synth-objtypes.ads +++ b/src/synth/synth-objtypes.ads @@ -281,10 +281,16 @@ package Synth.Objtypes is function Create_Memory (Vtype : Type_Acc) return Memtyp; + function Is_Equal (L, R : Memtyp) return Boolean; + procedure Init; -- Set by Init. Boolean_Type : Type_Acc := null; Logic_Type : Type_Acc := null; Bit_Type : Type_Acc := null; + + -- Also set by init. + Bit0 : Memtyp; + Bit1 : Memtyp; end Synth.Objtypes; |