mirror of
https://github.com/sxpert/hp-saturn
synced 2025-01-31 19:57:50 +01:00
23 lines
579 B
Verilog
23 lines
579 B
Verilog
/******************************************************************************
|
|
* 82x
|
|
*
|
|
* lots of things there
|
|
*
|
|
*/
|
|
|
|
`include "decstates.v"
|
|
|
|
`DEC_82X_CLRHST: begin
|
|
HST <= HST & ~nibble;
|
|
decstate <= `DEC_START;
|
|
`ifdef SIM
|
|
case (nibble)
|
|
4'h1: $display("%5h XM=0", saved_PC);
|
|
4'h2: $display("%5h SB=0", saved_PC);
|
|
4'h4: $display("%5h SR=0", saved_PC);
|
|
4'h8: $display("%5h MP=0", saved_PC);
|
|
4'hf: $display("%5h CLRHST", saved_PC);
|
|
default: $display("%5h CLRHST %f", saved_PC, nibble);
|
|
endcase
|
|
`endif
|
|
end
|