aboutsummaryrefslogtreecommitdiffstats
path: root/testsuite/gna/issue1843/repro.vhdl
blob: b7a7b589e772f47754c3879d50e7f48c673f5ea4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
ENTITY repro IS
  GENERIC(WIDTH : positive := 32);
  PORT(clk        : IN     bit);
END;

ARCHITECTURE rtl OF repro IS
  CONSTANT UPPER_LIMIT : bit_vector(WIDTH DOWNTO 0) := (OTHERS => '1');
  SIGNAL count : bit_vector((WIDTH-1) DOWNTO 0);
BEGIN

  p_counter : PROCESS (clk)
  BEGIN
    IF ('0', count) /= UPPER_LIMIT then
      count(0) <= '1';
    END IF;
  END PROCESS;

END ARCHITECTURE rtl;