27 lines
464 B
Coq
27 lines
464 B
Coq
|
module main;
|
||
|
|
|
||
|
|
reg [7:0] xu;
|
||
|
|
reg signed [7:0] xs;
|
||
|
|
|
||
|
|
initial begin
|
||
|
|
xu = 8'b1100_0000;
|
||
|
|
xs = 8'b1100_0000;
|
||
|
|
|
||
|
|
xu = xu >>> 3;
|
||
|
|
xs = xs >>> 3;
|
||
|
|
|
||
|
|
if (xu !== 8'b0001_1000) begin
|
||
|
|
$display("FAILED -- Unsigned >>> failed. xu=%b", xu);
|
||
|
|
$finish;
|
||
|
|
end
|
||
|
|
|
||
|
|
if (xs !== 8'b1111_1000) begin
|
||
|
|
$display("FAILED -- Signed >>> failed. xs=%b", xs);
|
||
|
|
$finish;
|
||
|
|
end
|
||
|
|
|
||
|
|
$display("PASSED");
|
||
|
|
end // initial begin
|
||
|
|
|
||
|
|
endmodule // main
|