testsuite/gna/bug15933/crash.vhd


1
2
3
4
5
6
7
8
9
10
11
12
13
14

entity crash is end;

architecture behav of crash is
  constant data_width : natural := 8;
  type data_type is record 
    data: bit_vector(data_width-1 downto 0); 
    enable: bit; 
  end record data_type; 
  type port_type is array(0 to 15) of data_type; 
  signal s : port_type;
begin
  s(s'range).enable <= '0';
end behav;