32 lines
617 B
Coq
32 lines
617 B
Coq
|
module automatic_task();
|
||
|
|
|
||
|
|
task automatic fill_array;
|
||
|
|
|
||
|
|
input [7:0] value;
|
||
|
|
|
||
|
|
reg [7:0] array[3:0];
|
||
|
|
|
||
|
|
event step;
|
||
|
|
|
||
|
|
fork
|
||
|
|
begin
|
||
|
|
#10 array[0] = value; ->step;
|
||
|
|
#10 array[1] = array[0]; ->step;
|
||
|
|
#10 array[2] = array[1]; ->step;
|
||
|
|
#10 array[3] = array[2]; ->step;
|
||
|
|
end
|
||
|
|
begin
|
||
|
|
@step $display(array[0], array[1], array[2], array[3]);
|
||
|
|
@step $display(array[0], array[1], array[2], array[3]);
|
||
|
|
@step $display(array[0], array[1], array[2], array[3]);
|
||
|
|
@step $display(array[0], array[1], array[2], array[3]);
|
||
|
|
end
|
||
|
|
join
|
||
|
|
|
||
|
|
endtask
|
||
|
|
|
||
|
|
initial #1 fill_array(1);
|
||
|
|
initial #2 fill_array(2);
|
||
|
|
|
||
|
|
endmodule
|