testsuite/gna/issue2323/st3.vhdl


1
2
3
4
5
6
7
8
9

entity st3 is
end;

architecture arch of st3 is
  type my_bv4 is array (natural range <>) of bit_vector(1 to 4);
  subtype mypos is natural range my_bv4'element'range;
  subtype my2 is mypos range 2 to 5;
begin
end arch;