blob: fc8e20e65c89d6c204d070c24ad198c12de9ce82 [file] [log] [blame]
module sequencer #(
// 01234567890123456789012345678901
parameter [32*8-1:0] trace_a = "________________________________",
parameter [32*8-1:0] trace_b = "________________________________",
parameter [32*8-1:0] trace_c = "________________________________",
parameter [32*8-1:0] trace_d = "________________________________"
) (
input clock,
output A, B, C, D
);
integer t = 0;
always @(posedge clock) t <= t + (t < 31);
assign A = trace_a[8*(31-t) +: 8] == "-";
assign B = trace_b[8*(31-t) +: 8] == "-";
assign C = trace_c[8*(31-t) +: 8] == "-";
assign D = trace_d[8*(31-t) +: 8] == "-";
endmodule
module pass_00 (input clock);
wire A, B, C, D;
sequencer #(
// 01234567890123456789012345678901
.trace_a("_-______________________________"),
.trace_b("__----__________________________"),
.trace_c("____----________________________"),
.trace_d("_____--_________________________")
) uut (clock, A, B, C, D);
sequence DD;
@(posedge clock)
D [*2];
endsequence
assert property (@(posedge clock) $rose(A) |=> B ##2 C until DD.triggered);
endmodule
module fail_01 (input clock);
wire A, B, C, D;
sequencer #(
// 01234567890123456789012345678901
.trace_a("_-______________________________"),
.trace_b("__----__________________________"),
.trace_c("____----________________________"),
.trace_d("____-_-_________________________")
) uut (clock, A, B, C, D);
sequence DD;
@(posedge clock)
D [*2];
endsequence
assert property (@(posedge clock) $rose(A) |=> B ##2 C until DD.triggered);
endmodule
module fail_02 (input clock);
wire A, B, C, D;
sequencer #(
// 01234567890123456789012345678901
.trace_a("_-______________________________"),
.trace_b("__----__________________________"),
.trace_c("____----________________________"),
.trace_d("_____--_________________________")
) uut (clock, A, B, C, D);
sequence DD;
@(posedge clock)
D [*2];
endsequence
assert property (@(posedge clock) $rose(A) |=> B ##2 C until_with DD.triggered);
endmodule
module pass_03 (input clock);
wire A, B, C, D;
sequencer #(
// 01234567890123456789012345678901
.trace_a("_-______________________________"),
.trace_b("__-----_________________________"),
.trace_c("____-----_______________________"),
.trace_d("_____--_________________________")
) uut (clock, A, B, C, D);
sequence DD;
@(posedge clock)
D [*2];
endsequence
assert property (@(posedge clock) $rose(A) |=> B ##2 C until_with DD.triggered);
endmodule