21 lines
275 B
Coq
21 lines
275 B
Coq
|
module test;
|
||
|
|
|
||
|
|
event e_Peek;
|
||
|
|
event e_Poke;
|
||
|
|
|
||
|
|
initial begin
|
||
|
|
// $dumpvars;
|
||
|
|
#0;
|
||
|
|
->e_Poke;
|
||
|
|
#51 $finish(0);
|
||
|
|
end
|
||
|
|
|
||
|
|
always @(e_Poke) begin
|
||
|
|
$display("e_Poke received @ %0t", $time);
|
||
|
|
#10;
|
||
|
|
$display("e_Peek asserted @ %0t", $time);
|
||
|
|
->e_Peek;
|
||
|
|
end
|
||
|
|
|
||
|
|
endmodule
|