forked from Github_Repos/cvw
		
	
		
			
				
	
	
		
			80 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			Systemverilog
		
	
	
	
	
	
			
		
		
	
	
			80 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			Systemverilog
		
	
	
	
	
	
`include "idiv-config.vh"
 | 
						|
 | 
						|
module tb;
 | 
						|
 | 
						|
   logic [31:0]  N, D;
 | 
						|
   logic 	 clk;
 | 
						|
   logic 	 reset;   
 | 
						|
   logic 	 start;
 | 
						|
   logic 	 S;   
 | 
						|
   
 | 
						|
   logic [31:0]  Q;
 | 
						|
   logic [31:0]  rem0;
 | 
						|
   logic 	 div0;
 | 
						|
   logic 	 done;
 | 
						|
   
 | 
						|
   integer 	 handle3;
 | 
						|
   integer 	 desc3;
 | 
						|
   integer 	 i;   
 | 
						|
 | 
						|
   logic [31:0]  Ncomp;
 | 
						|
   logic [31:0]  Dcomp;
 | 
						|
   logic [31:0]  Qcomp;
 | 
						|
   logic [31:0]  Rcomp;   
 | 
						|
   
 | 
						|
   logic [31:0]  vectornum;
 | 
						|
   logic [31:0]  errors;   
 | 
						|
 | 
						|
   intdiv #(32) dut (Q, done, rem0, div0, N, D, clk, reset, start, S);
 | 
						|
   
 | 
						|
   initial 
 | 
						|
     begin	
 | 
						|
	clk = 1'b0;
 | 
						|
	forever #5 clk = ~clk;
 | 
						|
     end
 | 
						|
 | 
						|
   initial
 | 
						|
     begin
 | 
						|
	vectornum = 0;
 | 
						|
	errors = 0;	
 | 
						|
	handle3 = $fopen("iter32_signed.out");
 | 
						|
     end
 | 
						|
 | 
						|
   always @(posedge clk, posedge reset)
 | 
						|
     begin
 | 
						|
	desc3 = handle3;	
 | 
						|
	#0  start = 1'b0;
 | 
						|
	#0  S = 1'b1;	
 | 
						|
	#0  reset = 1'b1;
 | 
						|
	#30 reset = 1'b0;
 | 
						|
	#30 N = 32'h0;
 | 
						|
	#0  D = 32'h0;	
 | 
						|
	for (i=0; i<`IDIV_TESTS; i=i+1)
 | 
						|
	  begin
 | 
						|
	     N = $urandom;
 | 
						|
	     D = $urandom;
 | 
						|
	     start <= 1'b1;
 | 
						|
	     // Wait 2 cycles (to be sure)
 | 
						|
	     repeat (2)
 | 
						|
	       @(posedge clk);
 | 
						|
	     start <= 1'b0;
 | 
						|
	     repeat (41)
 | 
						|
	       @(posedge clk);
 | 
						|
	     Ncomp = N;
 | 
						|
	     Dcomp = D;
 | 
						|
	     Qcomp = $signed(Ncomp)/$signed(Dcomp);
 | 
						|
	     Rcomp = $signed(Ncomp)%$signed(Dcomp);
 | 
						|
	       if ((Q !== Qcomp)) begin
 | 
						|
	       errors = errors + 1;
 | 
						|
	     end
 | 
						|
	     vectornum = vectornum + 1;	     
 | 
						|
	     $fdisplay(desc3, "%h %h %h %h || %h %h || %b %b", 
 | 
						|
		       N, D, Q, rem0, Qcomp, Rcomp, 
 | 
						|
		       (Q==Qcomp), (rem0==Rcomp));
 | 
						|
	  end // for (i=0; i<2, i=i+1)
 | 
						|
	$display("%d tests completed, %d errors", vectornum, errors);	
 | 
						|
	$finish;	
 | 
						|
     end 
 | 
						|
 | 
						|
endmodule // tb
 |