diff options
author | Tristan Gingold | 2015-01-10 21:48:23 +0100 |
---|---|---|
committer | Tristan Gingold | 2015-01-10 21:48:23 +0100 |
commit | 5f674701bcfe000eb9795c6d4704c2c56ceeb06c (patch) | |
tree | 5033b9f11467aa06c4881325c736aa00453dc0a3 /testsuite/gna/bug23165/mwe2 | |
parent | dcf9335a06eb78c5d977945f713f326e6288ae9a (diff) | |
download | ghdl-5f674701bcfe000eb9795c6d4704c2c56ceeb06c.tar.gz ghdl-5f674701bcfe000eb9795c6d4704c2c56ceeb06c.tar.bz2 ghdl-5f674701bcfe000eb9795c6d4704c2c56ceeb06c.zip |
Add minimal example for bug23165
Diffstat (limited to 'testsuite/gna/bug23165/mwe2')
-rw-r--r-- | testsuite/gna/bug23165/mwe2/mwe.vhd | 38 |
1 files changed, 38 insertions, 0 deletions
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; |