testsuite/gna/issue1898/scale4.vhdl


1
2
3
4
5
6
7
8
9

entity scale4 is
    port(b : in bit;
         w : out bit_vector(0 to 1));
end entity scale4;

architecture boop of scale4 is
begin
    w <= b and "01";
end architecture boop;