[Qemu-devel] [5074] sh4: fix tas.b @Rn instruction

[Aurelien Jarno]

Revision: 5074
          http://svn.sv.gnu.org/viewvc/?view=rev&root=qemu&revision=5074
Author:   aurel32
Date:     2008-08-22 21:30:28 +0000 (Fri, 22 Aug 2008)

Log Message:
-----------
sh4: fix tas.b @Rn instruction

(Shin-ichiro KAWASAKI, based on a patch from Andrzej Zaborowski)

Modified Paths:
--------------
    trunk/target-sh4/op.c
    trunk/target-sh4/translate.c

Modified: trunk/target-sh4/op.c
===================================================================
--- trunk/target-sh4/op.c       2008-08-22 21:25:00 UTC (rev 5073)
+++ trunk/target-sh4/op.c       2008-08-22 21:30:28 UTC (rev 5074)
@@ -592,13 +592,6 @@
     RETURN();
 }
 
-void OPPROTO op_tasb_rN(void)
-{
-    cond_t((env->gregs[PARAM1] & 0xff) == 0);
-    *(int8_t *) &env->gregs[PARAM1] |= 0x80;
-    RETURN();
-}
-
 void OPPROTO op_movl_T0_rN(void)
 {
     env->gregs[PARAM1] = T0;

Modified: trunk/target-sh4/translate.c
===================================================================
--- trunk/target-sh4/translate.c        2008-08-22 21:25:00 UTC (rev 5073)
+++ trunk/target-sh4/translate.c        2008-08-22 21:30:28 UTC (rev 5074)
@@ -1100,7 +1100,12 @@
        gen_op_shlr16_Rn(REG(B11_8));
        return;
     case 0x401b:               /* tas.b @Rn */
-       gen_op_tasb_rN(REG(B11_8));
+       gen_op_movl_rN_T0(REG(B11_8));
+       gen_op_movl_T0_T1();
+       gen_op_ldub_T0_T0(ctx);
+       gen_op_cmp_eq_imm_T0(0);
+       gen_op_or_imm_T0(0x80);
+       gen_op_stb_T0_T1(ctx);
        return;
     case 0xf00d: /* fsts FPUL,FRn - FPSCR: Nothing */
        gen_op_movl_fpul_FT0();