1 files changed, 11 insertions, 0 deletions
diff --git a/testsuite/gna/ticket37/genlogic.vhdl b/testsuite/gna/ticket37/genlogic.vhdl
new file mode 100644
index 0000000..b64d21f
--- /dev/null
+++ b/testsuite/gna/ticket37/genlogic.vhdl
@@ -0,0 +1,11 @@
+library ieee;
+use ieee.std_logic_1164.all;
+
+entity genlogic is
+  generic (val : std_logic := '0');
+end genlogic;
+
+architecture behav of genlogic is
+begin
+  assert val = '1' or val = 'H' severity failure;
+end behav;