testsuite/gna/issue803/tb.vhdl


1
2
3
4
5
6
7
8
9
10

entity tb is
end entity;

architecture arch of tb is
begin
  process begin
    report "Hello!" severity failure;
    wait;
  end process;
end;