summaryrefslogtreecommitdiff
path: root/testsuite/gna/bug08/paren4.vhdl
blob: f45fe8f3d2463282852617b0b3cdd3370e78d9b6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
entity paren4 is
end paren4;

architecture behav of paren4
is
  function a (param : natural) return natural is
  begin
    return param + 1;
  end a;
  constant b : natural := 3;
begin
  assert a(b) = 4;
end behav;