hp-saturn/opcodes/8x.v

24 lines
515 B
Coq
Raw Normal View History

2019-02-07 22:54:06 +01:00
/******************************************************************************
* 8
* a lot of things start with 8...
*
*/
`include "decstates.v"
`DEC_8X: begin
2019-02-07 22:54:06 +01:00
case (nibble)
4'h0: decstate <= `DEC_80X;
2019-02-08 00:02:55 +01:00
4'h2: decstate <= `DEC_82X_CLRHST;
4'h4: decstate <= `DEC_ST_EQ_0_N;
4'h5: decstate <= `DEC_ST_EQ_1_N;
2019-02-07 22:54:06 +01:00
4'hD: decstate <= `DEC_GOVLNG;
4'hF: decstate <= `DEC_GOSBVL;
default: begin
$display("ERROR : DEC_8X");
decode_error <= 1;
end
2019-02-07 22:54:06 +01:00
endcase
end