Subversion Repositories socgen

io_probe_in

 #(.MESG         ("multiply error"),

   .WIDTH        (32)

  )

rdata_tpb

  (

  .clk            (  clk        ),

  .expected_value (  mul_prod_exp[31:0]  ),

  .mask           (  {32{mask}} ),

  .signal         (  mul_prod_r[31:0]      )

  );

`ifndef SYNTHESYS

  task u_cmp;

    input  [31:0] a_in;

    input  [31:0] b_in;

    input  [31:0] exp;

     begin

      test.a_in <= a_in;

      test.b_in <= b_in;

      test.mul_prod_exp <= exp;

      test.alu_op_mul  <= 1'b1;

      test.ex_freeze    <= 1'b1;

      test.cg.next(1);

      while(mul_stall)        test.cg.next(1);

      test.mask  <= 1'b1;

      $display("%t %m   cycle %x %x %x",$realtime,a_in,b_in,exp );

      test.alu_op_mul  <= 1'b0;

      test.ex_freeze   <= 1'b0;

      test.cg.next(1);

      test.mask  <= 1'b0;

   end

  endtask

`endif

assign STOP = 1'b0;

assign BAD = 1'b0;