qemu-devel.nongnu.org archive mirror
 help / color / mirror / Atom feed
From: Aurelien Jarno <aurelien@aurel32.net>
To: qemu-devel@nongnu.org
Cc: Aurelien Jarno <aurelien@aurel32.net>
Subject: [Qemu-devel] [PATCH v2 18/20] target-i386: fix helper_fprem() and helper_fprem1() wrt softfloat
Date: Wed, 20 Apr 2011 12:12:07 +0200	[thread overview]
Message-ID: <1303294329-22634-19-git-send-email-aurelien@aurel32.net> (raw)
In-Reply-To: <1303294329-22634-1-git-send-email-aurelien@aurel32.net>

Reviewed-by: Peter Maydell <peter.maydell@linaro.org>
Signed-off-by: Aurelien Jarno <aurelien@aurel32.net>
---
 target-i386/op_helper.c |   48 +++++++++++++++++++++++++++-------------------
 1 files changed, 28 insertions(+), 20 deletions(-)

diff --git a/target-i386/op_helper.c b/target-i386/op_helper.c
index f18c573..6a536e2 100644
--- a/target-i386/op_helper.c
+++ b/target-i386/op_helper.c
@@ -4053,21 +4053,24 @@ void helper_fxtract(void)
 
 void helper_fprem1(void)
 {
-    CPU86_LDouble dblq, fpsrcop, fptemp;
+    double st0, st1, dblq, fpsrcop, fptemp;
     CPU86_LDoubleU fpsrcop1, fptemp1;
     int expdif;
     signed long long int q;
 
-    if (isinf(ST0) || isnan(ST0) || isnan(ST1) || (ST1 == 0.0)) {
-        ST0 = 0.0 / 0.0; /* NaN */
+    st0 = CPU86_LDouble_to_double(ST0);
+    st1 = CPU86_LDouble_to_double(ST1);
+
+    if (isinf(st0) || isnan(st0) || isnan(st1) || (st1 == 0.0)) {
+        ST0 = double_to_CPU86_LDouble(0.0 / 0.0); /* NaN */
         env->fpus &= (~0x4700); /* (C3,C2,C1,C0) <-- 0000 */
         return;
     }
 
-    fpsrcop = ST0;
-    fptemp = ST1;
-    fpsrcop1.d = fpsrcop;
-    fptemp1.d = fptemp;
+    fpsrcop = st0;
+    fptemp = st1;
+    fpsrcop1.d = ST0;
+    fptemp1.d = ST1;
     expdif = EXPD(fpsrcop1) - EXPD(fptemp1);
 
     if (expdif < 0) {
@@ -4081,7 +4084,7 @@ void helper_fprem1(void)
         dblq = fpsrcop / fptemp;
         /* round dblq towards nearest integer */
         dblq = rint(dblq);
-        ST0 = fpsrcop - fptemp * dblq;
+        st0 = fpsrcop - fptemp * dblq;
 
         /* convert dblq to q by truncating towards zero */
         if (dblq < 0.0)
@@ -4097,31 +4100,35 @@ void helper_fprem1(void)
     } else {
         env->fpus |= 0x400;  /* C2 <-- 1 */
         fptemp = pow(2.0, expdif - 50);
-        fpsrcop = (ST0 / ST1) / fptemp;
+        fpsrcop = (st0 / st1) / fptemp;
         /* fpsrcop = integer obtained by chopping */
         fpsrcop = (fpsrcop < 0.0) ?
                   -(floor(fabs(fpsrcop))) : floor(fpsrcop);
-        ST0 -= (ST1 * fpsrcop * fptemp);
+        st0 -= (st1 * fpsrcop * fptemp);
     }
+    ST0 = double_to_CPU86_LDouble(st0);
 }
 
 void helper_fprem(void)
 {
-    CPU86_LDouble dblq, fpsrcop, fptemp;
+    double st0, st1, dblq, fpsrcop, fptemp;
     CPU86_LDoubleU fpsrcop1, fptemp1;
     int expdif;
     signed long long int q;
 
-    if (isinf(ST0) || isnan(ST0) || isnan(ST1) || (ST1 == 0.0)) {
-       ST0 = 0.0 / 0.0; /* NaN */
+    st0 = CPU86_LDouble_to_double(ST0);
+    st1 = CPU86_LDouble_to_double(ST1);
+
+    if (isinf(st0) || isnan(st0) || isnan(st1) || (st1 == 0.0)) {
+       ST0 = double_to_CPU86_LDouble(0.0 / 0.0); /* NaN */
        env->fpus &= (~0x4700); /* (C3,C2,C1,C0) <-- 0000 */
        return;
     }
 
-    fpsrcop = (CPU86_LDouble)ST0;
-    fptemp = (CPU86_LDouble)ST1;
-    fpsrcop1.d = fpsrcop;
-    fptemp1.d = fptemp;
+    fpsrcop = st0;
+    fptemp = st1;
+    fpsrcop1.d = ST0;
+    fptemp1.d = ST1;
     expdif = EXPD(fpsrcop1) - EXPD(fptemp1);
 
     if (expdif < 0) {
@@ -4135,7 +4142,7 @@ void helper_fprem(void)
         dblq = fpsrcop/*ST0*/ / fptemp/*ST1*/;
         /* round dblq towards zero */
         dblq = (dblq < 0.0) ? ceil(dblq) : floor(dblq);
-        ST0 = fpsrcop/*ST0*/ - fptemp * dblq;
+        st0 = fpsrcop/*ST0*/ - fptemp * dblq;
 
         /* convert dblq to q by truncating towards zero */
         if (dblq < 0.0)
@@ -4152,12 +4159,13 @@ void helper_fprem(void)
         int N = 32 + (expdif % 32); /* as per AMD docs */
         env->fpus |= 0x400;  /* C2 <-- 1 */
         fptemp = pow(2.0, (double)(expdif - N));
-        fpsrcop = (ST0 / ST1) / fptemp;
+        fpsrcop = (st0 / st1) / fptemp;
         /* fpsrcop = integer obtained by chopping */
         fpsrcop = (fpsrcop < 0.0) ?
                   -(floor(fabs(fpsrcop))) : floor(fpsrcop);
-        ST0 -= (ST1 * fpsrcop * fptemp);
+        st0 -= (st1 * fpsrcop * fptemp);
     }
+    ST0 = double_to_CPU86_LDouble(st0);
 }
 
 void helper_fyl2xp1(void)
-- 
1.7.2.3

  parent reply	other threads:[~2011-04-20 10:12 UTC|newest]

Thread overview: 29+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2011-04-20 10:11 [Qemu-devel] [PATCH v2 00/20] *** SUBJECT HERE *** Aurelien Jarno
2011-04-20 10:11 ` [Qemu-devel] [PATCH v2 01/20] softfloat: fix floatx80 handling of NaN Aurelien Jarno
2011-04-20 10:35   ` Peter Maydell
2011-04-20 11:24     ` [Qemu-devel] [PATCH v3 " Aurelien Jarno
2011-04-20 11:28       ` Peter Maydell
2011-04-20 10:11 ` [Qemu-devel] [PATCH v2 02/20] softfloat: fix floatx80_is_infinity() Aurelien Jarno
2011-04-20 10:11 ` [Qemu-devel] [PATCH v2 03/20] softfloat: add floatx80 constants Aurelien Jarno
2011-04-20 10:11 ` [Qemu-devel] [PATCH v2 04/20] softfloat: add pi constants Aurelien Jarno
2011-04-20 10:40   ` Peter Maydell
2011-04-20 10:11 ` [Qemu-devel] [PATCH v2 05/20] softfloat-native: add a few constant values Aurelien Jarno
2011-04-20 10:11 ` [Qemu-devel] [PATCH v2 06/20] softfloat: add floatx80_compare*() functions Aurelien Jarno
2011-04-20 10:11 ` [Qemu-devel] [PATCH v2 07/20] softfloat: fix float*_scalnb() corner cases Aurelien Jarno
2011-04-20 10:40   ` Peter Maydell
2011-04-20 10:11 ` [Qemu-devel] [PATCH v2 08/20] softfloat-native: fix float*_scalbn() functions Aurelien Jarno
2011-04-20 10:11 ` [Qemu-devel] [PATCH v2 09/20] softfloat-native: add float*_is_any_nan() functions Aurelien Jarno
2011-04-20 10:11 ` [Qemu-devel] [PATCH v2 10/20] target-i386: fix helper_fscale() wrt softfloat Aurelien Jarno
2011-04-20 10:12 ` [Qemu-devel] [PATCH v2 11/20] target-i386: fix helper_fbld_ST0() " Aurelien Jarno
2011-04-20 10:41   ` Peter Maydell
2011-04-20 10:12 ` [Qemu-devel] [PATCH v2 12/20] target-i386: fix helper_fxtract() " Aurelien Jarno
2011-04-20 10:12 ` [Qemu-devel] [PATCH v2 13/20] target-i386: fix helper_fdiv() " Aurelien Jarno
2011-04-20 10:12 ` [Qemu-devel] [PATCH v2 14/20] target-i386: fix helper_fsqrt() " Aurelien Jarno
2011-04-20 10:12 ` [Qemu-devel] [PATCH v2 15/20] target-i386: replace approx_rsqrt and approx_rcp by softfloat ops Aurelien Jarno
2011-04-20 10:12 ` [Qemu-devel] [PATCH v2 16/20] target-i386: add CPU86_LDouble <-> double conversion functions Aurelien Jarno
2011-04-20 10:12 ` [Qemu-devel] [PATCH v2 17/20] target-i386: fix logarithmic and trigonometric helpers wrt softfloat Aurelien Jarno
2011-04-20 10:41   ` Peter Maydell
2011-04-20 10:12 ` Aurelien Jarno [this message]
2011-04-20 10:12 ` [Qemu-devel] [PATCH v2 19/20] target-i386: fix constants " Aurelien Jarno
2011-04-20 10:12 ` [Qemu-devel] [PATCH v2 20/20] target-i386: switch to softfloat Aurelien Jarno
2011-04-20 10:42   ` Peter Maydell

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=1303294329-22634-19-git-send-email-aurelien@aurel32.net \
    --to=aurelien@aurel32.net \
    --cc=qemu-devel@nongnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).