URL
https://opencores.org/ocsvn/rtf8088/rtf8088/trunk
Go to most recent revision |
Show entire file |
Details |
Blame |
View Log
| Rev 4 |
Rev 5 |
| Line 251... |
Line 251... |
|
|
8'hD0,8'hD1,8'hD2,8'hD3,8'hC0,8'hC1:
|
8'hD0,8'hD1,8'hD2,8'hD3,8'hC0,8'hC1:
|
begin
|
begin
|
state <= IFETCH;
|
state <= IFETCH;
|
wrregs <= 1'b1;
|
wrregs <= 1'b1;
|
|
rrr <= rm;
|
if (w)
|
if (w)
|
case(rrr)
|
case(rrr)
|
3'b000: // ROL
|
3'b000: // ROL
|
begin
|
begin
|
res <= shlo[15:0]|shlo[31:16];
|
res <= shlo[15:0]|shlo[31:16];
|
| Line 279... |
Line 280... |
cf <= b[0];
|
cf <= b[0];
|
vf <= cf^b[15];
|
vf <= cf^b[15];
|
end
|
end
|
3'b100: // SHL
|
3'b100: // SHL
|
begin
|
begin
|
|
$display("SHL:%h,%h,%d",shlo[15:0],b,shftamt);
|
res <= shlo[15:0];
|
res <= shlo[15:0];
|
cf <= shlo[16];
|
cf <= shlo[16];
|
vf <= b[15]^b[14];
|
vf <= b[15]^b[14];
|
end
|
end
|
3'b101: // SHR
|
3'b101: // SHR
|
begin
|
begin
|
|
$display("SHR:%h,%h,%d",shruo[31:16],b,shftamt);
|
res <= shruo[31:16];
|
res <= shruo[31:16];
|
cf <= shruo[15];
|
cf <= shruo[15];
|
vf <= b[15];
|
vf <= b[15];
|
end
|
end
|
3'b111: // SAR
|
3'b111: // SAR
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.