testsuite/gna/ticket43/bug.vhdl


1
2
3
4
5
6
7
8
9
10
11
12
13

entity bug is
end;

use work.pkg.all;

architecture behav of bug is
begin
  p: process
    variable rec : rec_t;
  begin
    wait;
  end process;
end behav;