aboutsummaryrefslogtreecommitdiffstats
path: root/testsuite/gna/issue616/repro.vhdl
blob: 1632bb056abfd532e69c8d0c76c8b72194fe75d3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
package repro is
  function return_true return boolean;
end repro;

package body repro is
  function slv_ones(constant width : in integer) return bit_vector is
  begin
    return (1 to width => '1');
  end function;
  
  function return_true return boolean is
    constant ones_c : bit_vector(31 downto 0) := slv_ones(32);
  begin
    return true;
  end function;
end repro;