From f692b62f5c60f2ce83fb8487ffdabaa5ff531c4e Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Fri, 28 Dec 2018 09:17:01 +0100
Subject: openieee: add to_01 bodies (WIP)
---
libraries/openieee/build_1164.py | 53 ++++++++++++++++++++++++++++++++++++++++
1 file changed, 53 insertions(+)
(limited to 'libraries')
diff --git a/libraries/openieee/build_1164.py b/libraries/openieee/build_1164.py
index 0eb16595f..d07274d76 100755
--- a/libraries/openieee/build_1164.py
+++ b/libraries/openieee/build_1164.py
@@ -344,8 +344,61 @@ def disp_conv_b_t(typ):
return bit_to_x01 (b);
end to_{1};\n""".format(typ, utyp))
+def disp_conv_01():
+ "Generate to_01 bodies"
+ w("""
+ function to_01 (s : std_{0}_vector; xmap : std_ulogic := '0')
+ return std_{0}_vector
+ is
+ subtype res_type is std_{0}_vector (s'length - 1 downto 0);
+ alias sa : res_type is s;
+ variable res : res_type;
+ begin
+ for i in res_type'range loop
+ case sa(i) is
+ when '0' | 'L' => res (i) := '0';
+ when '1' | 'H' => res (i) := '1';
+ when others => return res_type'(others => xmap);
+ end case;
+ end loop;
+ return res;
+ end to_01;\n""".format("ulogic"))
+ w("")
+ w("""
+ function to_01 (s : std_{0}; xmap : std_ulogic := '0')
+ return std_{0} is
+ begin
+ case s is
+ when '0' | 'L' => return '0';
+ when '1' | 'H' => return '1';
+ when others => return xmap;
+ end case;
+ end to_01;\n""".format("ulogic"))
+ w("")
+ w("""
+ function to_01 (s : bit_vector; xmap : std_ulogic := '0')
+ return std_{0}_vector
+ is
+ alias sa : bit_vector(s'length - 1 downto 0) is s;
+ variable res : std_{0}_vector (s'length - 1 downto 0);
+ begin
+ for i in sa'range loop
+ res (i) := bit_to_std (sa (i));
+ end loop;
+ return res;
+ end to_01;\n""".format("ulogic"))
+ w("")
+ w("""
+ function to_01 (s : bit; xmap : std_ulogic := '0')
+ return std_{0} is
+ begin
+ return bit_to_std(s);
+ end to_01;\n""".format("ulogic"))
+
def disp_all_norm_funcs(version):
"Generate all function bodies for conversion"
+ if version >= V08:
+ disp_conv_01()
for typ in [ "x01", "x01z", "ux01" ]:
for v in vec_types:
disp_conv_vec_vec(typ, v)
--
cgit v1.2.3