From 5f674701bcfe000eb9795c6d4704c2c56ceeb06c Mon Sep 17 00:00:00 2001
From: Tristan Gingold
Date: Sat, 10 Jan 2015 21:48:23 +0100
Subject: Add minimal example for bug23165

---
 testsuite/gna/bug23165/mwe2/mwe.vhd | 38 +++++++++++++++++++++++++++++++++++++
 1 file changed, 38 insertions(+)
 create mode 100644 testsuite/gna/bug23165/mwe2/mwe.vhd

(limited to 'testsuite/gna/bug23165/mwe2')

diff --git a/testsuite/gna/bug23165/mwe2/mwe.vhd b/testsuite/gna/bug23165/mwe2/mwe.vhd
new file mode 100644
index 0000000..40b5cd7
--- /dev/null
+++ b/testsuite/gna/bug23165/mwe2/mwe.vhd
@@ -0,0 +1,38 @@
+library ieee;
+use ieee.std_logic_1164.all;
+
+entity mwe is
+end mwe;
+
+architecture lulz of mwe is
+type sig_t is array (0 to 1) of std_logic_vector(1 downto 0);
+signal sigw 	: sig_t := (others => (others => '0'));
+signal sigf 	: sig_t := (others => (others => '0'));
+signal clk	: std_logic := '0';
+
+begin
+	clk <= not clk after 50 ns;
+
+	sigw(0) <= (others => '1');
+	sigf(0) <= (others => '1');
+
+	fail : process
+		variable i : integer range 0 to 0 := 0;
+		variable j : integer range 1 to 1 := 1;
+	begin
+		wait until rising_edge(clk);
+		sigf(j) <= sigf(i);
+	end process;
+
+	work : process
+	begin
+		wait until rising_edge(clk);
+		sigw(1) <= sigw(0);
+	end process;
+
+        process (sigf)
+        begin
+          report "sigf(1) = " & std_logic'image (sigf (0)(1));
+          assert now = 0 ns or sigf (0) = "XX" severity failure;
+        end process;
+end lulz;
-- 
cgit