aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-ieee-std_logic_1164.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/synth/synth-ieee-std_logic_1164.ads')
-rw-r--r--src/synth/synth-ieee-std_logic_1164.ads9
1 files changed, 9 insertions, 0 deletions
diff --git a/src/synth/synth-ieee-std_logic_1164.ads b/src/synth/synth-ieee-std_logic_1164.ads
index d4e396c3e..9903778f5 100644
--- a/src/synth/synth-ieee-std_logic_1164.ads
+++ b/src/synth/synth-ieee-std_logic_1164.ads
@@ -22,6 +22,13 @@ with Types; use Types;
with Synth.Objtypes; use Synth.Objtypes;
package Synth.Ieee.Std_Logic_1164 is
+
+ -- For std.standard. Should a package be created ?
+ type Bit is ('0', '1');
+
+ function Read_Bit (M : Memory_Ptr; Off : Uns32) return Bit;
+ procedure Write_Bit (M : Memory_Ptr; Off : Uns32; Val : Bit);
+
-- From openieee.
-- Unresolved logic state.
@@ -47,6 +54,8 @@ package Synth.Ieee.Std_Logic_1164 is
function Read_Bit_To_Std_Logic (M : Memory_Ptr; Off : Uns32)
return Std_Ulogic;
+ function To_Bit (S : Std_Ulogic; Xmap : Bit) return Bit;
+
type Table_1d is array (Std_Ulogic) of Std_Ulogic;
type Table_2d is array (Std_Ulogic, Std_Ulogic) of Std_Ulogic;