Subversion Repositories srdydrdy_lib

 
task get_packet_count;
  output [31:0] pcount;
  integer       p;
  begin
    p = 0;
    p = p + env_top.mon0.rxpkt_num;
    p = p + env_top.mon1.rxpkt_num;
    p = p + env_top.mon2.rxpkt_num;
    p = p + env_top.mon3.rxpkt_num;
    pcount = p;
  end
endtask // get_packet_count
 
task check_expected;
  input [31:0] exp_val, act_val;
  begin
    if (exp_val !== act_val)
      $display ("%t: ERROR:  Expected %x, Actual value %x", $time, exp_val, act_val);
  end
endtask // check_expected