testsuite/gna/bug023/ppkg1_tb.vhdl


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

entity ppkg1_tb is
end ppkg1_tb;

use work.ppkg1.all;
architecture behav of ppkg1_tb is
begin
  process
  begin
    rep1;
    rep2;
    rep3;
    wait;
  end process;
end behav;