testsuite/gna/issue2148/e1.vhdl


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

entity e1 is
  port (v : out natural);
end;

architecture behav of e1 is
begin
  process
  begin
    report natural'image(v);
    wait;
  end process;
end;