22 lines
383 B
Coq
22 lines
383 B
Coq
|
|
// Icarus doesn't properly support variable expressions on the right hand
|
||
|
|
// side of a procedural CA - see bug 605.
|
||
|
|
|
||
|
|
module test();
|
||
|
|
|
||
|
|
reg [1:0] addr;
|
||
|
|
reg [3:0] memory[3:0];
|
||
|
|
reg [3:0] data;
|
||
|
|
|
||
|
|
initial begin
|
||
|
|
assign data = memory[addr];
|
||
|
|
addr = 1;
|
||
|
|
memory[addr] = 2;
|
||
|
|
#0 $display("%d", data);
|
||
|
|
if (data === 2)
|
||
|
|
$display("PASSED");
|
||
|
|
else
|
||
|
|
$display("FAILED");
|
||
|
|
end
|
||
|
|
|
||
|
|
endmodule
|