From: balrog <balrog@c046a42c-6fe2-441c-8c8c-71466251a162>
Date: Mon, 21 May 2007 17:48:01 +0000 (+0000)
Subject: Don't touch carry flag in ASR <reg> with zero <reg>, submitted by Aurelien Jarno.
X-Git-Url: http://git.maquefel.me/?a=commitdiff_plain;h=1b1afeb95b1e31ca32b48b07ff862a7b885b3896;p=qemu.git

Don't touch carry flag in ASR <reg> with zero <reg>, submitted by Aurelien Jarno.


git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@2843 c046a42c-6fe2-441c-8c8c-71466251a162
---

diff --git a/target-arm/op.c b/target-arm/op.c
index fd44a40f83..d7ac6de062 100644
--- a/target-arm/op.c
+++ b/target-arm/op.c
@@ -667,7 +667,7 @@ void OPPROTO op_sarl_T1_T0_cc(void)
     if (shift >= 32) {
         env->CF = (T1 >> 31) & 1;
         T1 = (int32_t)T1 >> 31;
-    } else {
+    } else if (shift != 0) {
         env->CF = (T1 >> (shift - 1)) & 1;
         T1 = (int32_t)T1 >> shift;
     }