[HPPAQEMU-CVS] hppaqemu/target-hppa op.c,1.29,1.30

[Stuart B. <zu...@us...>]

Update of /cvsroot/hppaqemu/hppaqemu/target-hppa
In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv749

Modified Files:
	op.c 
Log Message:
dcor/idcor fixes, based on a patch by Tomonori Yamane.


Index: op.c
===================================================================
RCS file: /cvsroot/hppaqemu/hppaqemu/target-hppa/op.c,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -d -r1.29 -r1.30
--- op.c	20 Apr 2007 14:44:38 -0000	1.29
+++ op.c	20 Apr 2007 14:53:06 -0000	1.30
@@ -673,26 +673,26 @@
 
 void OPPROTO op_dcor_T0(void)
 {
-    T0 -= (((0x6 * (1 - (env->psw & PSW_CB7))) << 4) |
-          (((0x6 * (1 - (env->psw & PSW_CB6))) << 4) |
-          (((0x6 * (1 - (env->psw & PSW_CB5))) << 4) |
-          (((0x6 * (1 - (env->psw & PSW_CB4))) << 4) |
-          (((0x6 * (1 - (env->psw & PSW_CB3))) << 4) |
-          (((0x6 * (1 - (env->psw & PSW_CB2))) << 4) |
-          (((0x6 * (1 - (env->psw & PSW_CB1))) << 4) |
-          (((0x6 * (1 - (env->psw & PSW_CB0))))))))))));
+    T0 -= ((((env->psw & PSW_CB7) ? 0 : 6) << 4) |
+          ((((env->psw & PSW_CB6) ? 0 : 6) << 4) |
+          ((((env->psw & PSW_CB5) ? 0 : 6) << 4) |
+          ((((env->psw & PSW_CB4) ? 0 : 6) << 4) |
+          ((((env->psw & PSW_CB3) ? 0 : 6) << 4) |
+          ((((env->psw & PSW_CB2) ? 0 : 6) << 4) |
+          ((((env->psw & PSW_CB1) ? 0 : 6) << 4) |
+          ((((env->psw & PSW_CB0) ? 0 : 6))))))))));
 }
 
 void OPPROTO op_idcor_T0(void)
 {
-    T0 += (((0x6 * (env->psw & PSW_CB7)) << 4) |
-          (((0x6 * (env->psw & PSW_CB6)) << 4) |
-          (((0x6 * (env->psw & PSW_CB5)) << 4) |
-          (((0x6 * (env->psw & PSW_CB4)) << 4) |
-          (((0x6 * (env->psw & PSW_CB3)) << 4) |
-          (((0x6 * (env->psw & PSW_CB2)) << 4) |
-          (((0x6 * (env->psw & PSW_CB1)) << 4) |
-          (((0x6 * (env->psw & PSW_CB0)))))))))));
+    T0 += ((((env->psw & PSW_CB7) ? 6 : 0) << 4) |
+          ((((env->psw & PSW_CB6) ? 6 : 0) << 4) |
+          ((((env->psw & PSW_CB5) ? 6 : 0) << 4) |
+          ((((env->psw & PSW_CB4) ? 6 : 0) << 4) |
+          ((((env->psw & PSW_CB3) ? 6 : 0) << 4) |
+          ((((env->psw & PSW_CB2) ? 6 : 0) << 4) |
+          ((((env->psw & PSW_CB1) ? 6 : 0) << 4) |
+          ((((env->psw & PSW_CB0) ? 6 : 0))))))))));
 }
 
 /* Shift/deposit insns */