Files
iverilog/ivtest/ivltests/nb_delay.v
T
Stephen Williams cea237b407 Add ivtest to the iverilog source tree
By adding ivtest to the iverilog source tree, it is easier to keep
the regression test synchronized with the source that is being tested.
This should be especially helpful for PRs that add a new feature, and
have a matching ivtest PR with the regression test for that feature.
2022-01-15 10:18:50 -08:00

94 lines
2.3 KiB
Verilog

/*
* For a non-blocking delay the last NB assign in the same thread
* at the same time must set the final result, but you are allowed
* to have multiple assignments in the queue.
*/
module top;
reg passed = 1'b1;
reg out;
real rout;
integer delay;
initial begin
out <= 1'b1;
out <= 1'b0;
rout <= 0.0;
rout <= 1.0;
#1;
if (out !== 1'b0) begin
$display("FAILED: zero delay, expected 1'b0, got %b", out);
passed = 1'b0;
end
if (rout != 1.0) begin
$display("FAILED: zero delay (real), expected 1.0, got %f", rout);
passed = 1'b0;
end
out <= #1 1'b0;
out <= #1 1'b1;
rout <= #1 0.0;
rout <= #1 2.0;
#2;
if (out !== 1'b1) begin
$display("FAILED: constant delay, expected 1'b1, got %b", out);
passed = 1'b0;
end
if (rout != 2.0) begin
$display("FAILED: constant delay (real), expected 2.0, got %f", rout);
passed = 1'b0;
end
delay = 2;
out <= #(delay) 1'b1;
out <= #(delay) 1'b0;
rout <= #(delay) 0.0;
rout <= #(delay) 3.0;
#(delay+1);
if (out !== 1'b0) begin
$display("FAILED: calculated delay, expected 1'b0, got %b", out);
passed = 1'b0;
end
if (rout != 3.0) begin
$display("FAILED: calculated delay (real), expected 3.0, got %f", rout);
passed = 1'b0;
end
out <= #1 1'b1;
out <= #3 1'b0;
out <= #5 1'b1;
rout <= #1 1.0;
rout <= #3 3.0;
rout <= #5 5.0;
#2;
if (out !== 1'b1) begin
$display("FAILED: first delay, expected 1'b1, got %b", out);
passed = 1'b0;
end
if (rout != 1.0) begin
$display("FAILED: first delay (real), expected 1.0, got %f", rout);
passed = 1'b0;
end
#2;
if (out !== 1'b0) begin
$display("FAILED: second delay, expected 1'b0, got %b", out);
passed = 1'b0;
end
if (rout != 3.0) begin
$display("FAILED: second delay (real), expected 3.0, got %f", rout);
passed = 1'b0;
end
#2;
if (out !== 1'b1) begin
$display("FAILED: third delay, expected 1'b1, got %b", out);
passed = 1'b0;
end
if (rout != 5.0) begin
$display("FAILED: third delay (real), expected 5.0, got %f", rout);
passed = 1'b0;
end
if (passed) $display("PASSED");
end
endmodule