43 lines
791 B
Coq
43 lines
791 B
Coq
|
// We want to print a warning if we find a delay that comes from the
|
||
|
|
// default timescale (1s) and then one from a given timescale.
|
||
|
|
// Basically we want to have either the case of no timescales or
|
||
|
|
// timescales for all delays.
|
||
|
|
module wo_time(out, in);
|
||
|
|
output out;
|
||
|
|
input in;
|
||
|
|
|
||
|
|
buf(out, in);
|
||
|
|
|
||
|
|
specify
|
||
|
|
(in => out) = 1;
|
||
|
|
endspecify
|
||
|
|
endmodule
|
||
|
|
|
||
|
|
module top;
|
||
|
|
reg in;
|
||
|
|
wire out_wo, out_w;
|
||
|
|
|
||
|
|
wo_time wo(out_wo, in);
|
||
|
|
w_time w(out_w, in);
|
||
|
|
|
||
|
|
initial begin
|
||
|
|
in = 1'b1;
|
||
|
|
#2 $finish(0);
|
||
|
|
end
|
||
|
|
|
||
|
|
always @(out_wo) $display("The time in wo_time is: %e", $abstime);
|
||
|
|
always @(out_w) $display("The time in w_time is: %e", $abstime);
|
||
|
|
endmodule
|
||
|
|
|
||
|
|
`timescale 1ns/1ns
|
||
|
|
module w_time(out, in);
|
||
|
|
output out;
|
||
|
|
input in;
|
||
|
|
|
||
|
|
buf(out, in);
|
||
|
|
|
||
|
|
specify
|
||
|
|
(in => out) = 1;
|
||
|
|
endspecify
|
||
|
|
endmodule
|