Subversion Repositories srdydrdy_lib

module sample_test;
 
  integer pcount;
`include "test_tasks.v"
 
  initial
    begin
      wait (env_top.reset === 1'b0);
      #200;
 
      repeat (`FIB_ENTRIES)
	@(posedge env_top.clk);
 
      fork
	env_top.driver0.send_packet (1, 2, 20);
	env_top.driver1.send_packet (2, 3, 64);
	env_top.driver2.send_packet (3, 4, 64);
	env_top.driver3.send_packet (4, 1, 64);
      join
 
      #2000;
 
      get_packet_count (pcount);
      check_expected (9, pcount);
      $display ("TEST: Received %d packets", pcount);
      $finish;
    end
 
endmodule // sample_test