Add regression test for multiple events in non-blocking event control
Check that multiple events can be used in a non-blocking event control assignment. The assignment should happen if either of the events trigger. Signed-off-by: Lars-Peter Clausen <lars@metafoo.de>
This commit is contained in:
parent
c3c7f6d9ee
commit
2bc1385a59
|
|
@ -0,0 +1,54 @@
|
||||||
|
// Check that non-blocking event control assignments with multiple events in the
|
||||||
|
// event control expression are supported.
|
||||||
|
|
||||||
|
module test;
|
||||||
|
reg failed = 1'b0;
|
||||||
|
|
||||||
|
`define check(val, exp) \
|
||||||
|
if (val !== exp) begin \
|
||||||
|
$display("FAILED. Expected %d, got %d.", exp, val); \
|
||||||
|
failed = 1'b1; \
|
||||||
|
end
|
||||||
|
|
||||||
|
integer x = 0;
|
||||||
|
|
||||||
|
event e1, e2, e3;
|
||||||
|
|
||||||
|
initial begin
|
||||||
|
// Any of them should trigger the event
|
||||||
|
x <= @(e1 or e2 or e3) x + 1;
|
||||||
|
#1
|
||||||
|
`check(x, 0);
|
||||||
|
->e1;
|
||||||
|
`check(x, 1);
|
||||||
|
|
||||||
|
x <= @(e1 or e2 or e3) x + 1;
|
||||||
|
#1
|
||||||
|
`check(x, 1);
|
||||||
|
->e2;
|
||||||
|
`check(x, 2);
|
||||||
|
|
||||||
|
// Alternative syntax, but still the same behavior
|
||||||
|
x <= @(e1, e2, e3) x + 1;
|
||||||
|
#1
|
||||||
|
`check(x, 2);
|
||||||
|
->e3;
|
||||||
|
`check(x, 3);
|
||||||
|
|
||||||
|
// In combination with repeat
|
||||||
|
x <= repeat(3) @(e1, e2, e3) x + 1;
|
||||||
|
#1
|
||||||
|
`check(x, 3);
|
||||||
|
->e1;
|
||||||
|
`check(x, 3);
|
||||||
|
->e2;
|
||||||
|
`check(x, 3);
|
||||||
|
->e3;
|
||||||
|
`check(x, 4);
|
||||||
|
|
||||||
|
if (!failed) begin
|
||||||
|
$display("PASSED");
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
endmodule
|
||||||
|
|
@ -677,6 +677,7 @@ named_event_no_edges CE ivltests
|
||||||
nb_assign normal ivltests
|
nb_assign normal ivltests
|
||||||
nb_delay normal ivltests
|
nb_delay normal ivltests
|
||||||
nb_ec_concat normal ivltests
|
nb_ec_concat normal ivltests
|
||||||
|
nb_ec_multi_ev normal ivltests
|
||||||
nblkorder normal ivltests # Validates Non-blocking order determinism
|
nblkorder normal ivltests # Validates Non-blocking order determinism
|
||||||
negative_genvar normal ivltests
|
negative_genvar normal ivltests
|
||||||
negvalue normal ivltests gold=negvalue.gold
|
negvalue normal ivltests gold=negvalue.gold
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue