-- out
process(state_int, p_read, p_write_int, z_int, rbyte_int, p_rget_int,
strich_int, aktop_int, opp_int, opcode_int, op1_int, op2_int, op3,
- do_calc_int)
+ do_calc_int, wtmp_int)
function hbyte2csigned (x : hbyte) return csigned is
variable y : csigned;
begin