Mercurial > repos > blastem
diff z80_to_x86.c @ 1054:ca38a29d2d76
Implement undocumented flag bits for RLD and RRD
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Fri, 29 Jul 2016 20:59:19 -0700 |
parents | b86c3ce007d9 |
children | ac4615d16226 |
line wrap: on
line diff
--- a/z80_to_x86.c Fri Jul 29 09:23:59 2016 -0700 +++ b/z80_to_x86.c Fri Jul 29 20:59:19 2016 -0700 @@ -1797,6 +1797,7 @@ setcc_rdisp(code, CC_P, opts->gen.context_reg, zf_off(ZF_PV)); setcc_rdisp(code, CC_Z, opts->gen.context_reg, zf_off(ZF_Z)); setcc_rdisp(code, CC_S, opts->gen.context_reg, zf_off(ZF_S)); + mov_rrdisp(code, opts->regs[Z80_A], opts->gen.context_reg, zf_off(ZF_XY), SZ_B); zreg_to_native(opts, Z80_HL, opts->gen.scratch2); ror_ir(code, 8, opts->gen.scratch1, SZ_W); @@ -1828,6 +1829,7 @@ setcc_rdisp(code, CC_P, opts->gen.context_reg, zf_off(ZF_PV)); setcc_rdisp(code, CC_Z, opts->gen.context_reg, zf_off(ZF_Z)); setcc_rdisp(code, CC_S, opts->gen.context_reg, zf_off(ZF_S)); + mov_rrdisp(code, opts->regs[Z80_A], opts->gen.context_reg, zf_off(ZF_XY), SZ_B); zreg_to_native(opts, Z80_HL, opts->gen.scratch2); ror_ir(code, 8, opts->gen.scratch1, SZ_W);