hp-saturn/opcodes/82x_CLRHST.v

25 lines
531 B
Coq
Raw Normal View History

2019-02-07 22:54:06 +01:00
/******************************************************************************
* 82x
*
* lots of things there
*
*/
2019-02-08 00:02:55 +01:00
`include "decstates.v"
`DEC_82X_CLRHST: begin
HST <= HST & ~nibble;
decstate <= `DEC_START;
`ifdef SIM
2019-02-08 11:15:16 +01:00
$write("%5h ", inst_start_PC);
2019-02-08 00:02:55 +01:00
case (nibble)
2019-02-08 11:15:16 +01:00
4'h1: $display("XM=0");
4'h2: $display("SB=0");
4'h4: $display("SR=0");
4'h8: $display("MP=0");
4'hf: $display("CLRHST");
default: $display("CLRHST\t%f", nibble);
2019-02-08 00:02:55 +01:00
endcase
`endif
end