From nobody Fri May 3 19:14:36 2024 Delivered-To: importer@patchew.org Received-SPF: pass (zoho.com: domain of gnu.org designates 208.118.235.17 as permitted sender) client-ip=208.118.235.17; envelope-from=qemu-devel-bounces+importer=patchew.org@nongnu.org; helo=lists.gnu.org; Authentication-Results: mx.zoho.com; spf=pass (zoho.com: domain of gnu.org designates 208.118.235.17 as permitted sender) smtp.mailfrom=qemu-devel-bounces+importer=patchew.org@nongnu.org; Return-Path: Received: from lists.gnu.org (lists.gnu.org [208.118.235.17]) by mx.zohomail.com with SMTPS id 1498763148828550.8017092177281; Thu, 29 Jun 2017 12:05:48 -0700 (PDT) Received: from localhost ([::1]:40867 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dQel8-0005ce-FX for importer@patchew.org; Thu, 29 Jun 2017 15:05:46 -0400 Received: from eggs.gnu.org ([2001:4830:134:3::10]:50138) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dQejr-0004yb-2H for qemu-devel@nongnu.org; Thu, 29 Jun 2017 15:04:28 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1dQejn-0006xv-Qa for qemu-devel@nongnu.org; Thu, 29 Jun 2017 15:04:27 -0400 Received: from mout.kundenserver.de ([212.227.126.130]:59754) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1dQejn-0006xM-Ft for qemu-devel@nongnu.org; Thu, 29 Jun 2017 15:04:23 -0400 Received: from localhost.localdomain ([78.238.229.36]) by mrelayeu.kundenserver.de (mreue004 [212.227.15.167]) with ESMTPSA (Nemesis) id 0MXkot-1dCbia20Ih-00Wnq0; Thu, 29 Jun 2017 21:04:07 +0200 From: Laurent Vivier To: qemu-devel@nongnu.org Date: Thu, 29 Jun 2017 21:04:05 +0200 Message-Id: <20170629190405.1748-1-laurent@vivier.eu> X-Mailer: git-send-email 2.9.4 X-Provags-ID: V03:K0:SD5o1dUQI58zoJFqKGW7CYyRgQYttGgWB3dLAL1o8DTsBduMPlQ F/okFVUs+roDnfMClhu8nDNnTrmKhnah0q0qUkFG6nHrXHV6fJKJNXXP5PxVqP61rBeppl6 JEusKDnGg/ajSEyDuMXobR+pvXs9410CM69lJHVgdbSZZk49r/xO1WQdo7Pq1HBtb03ot4c Z392Ba5tPdsH9lNvGaVMw== X-UI-Out-Filterresults: notjunk:1;V01:K0:2bUaUOZmx6Y=:/4GTuChQu5LAfg5W//nwFJ 312H43JafCBMoXq7BK2dfJh1ZhTiWQargc8SApgMsscyInzbGhzsHLOx7ZsSRh1037lUuqTMk a4FkU1t6E+0RZEkYkvxrNorXKt+r7o7S6a/tJAehMJe3fo8i1jYQhEc+oCmZllH7xvQ2wM3mR FPUu1ZhczzRhSxPHH1XgWy2btVDDrT0hQrD5KOu+gagWmlulUhpY9DzKT3QDNcpGgLa9m4f+f OYHMz+Iqyf34uHcgH5lhlHHsjwklblxGlTx+jRJenXUjqzvp7xyNhXE/iLVd0dzgF8EU8bEdG FOgH/USmBwUWo8J5SDS/u37qITPKFRm4KeZwTIB/MgVO1+Ld11CkibIBsWNaneUPwWvNZfTSx wnO7WrInTz/GtsS+jYGQxTMQ2eSNQP3NO8sKutZ3NTfr625gH8MSPrYm6lVOvFXFSGMVr1D1m eQ+SvGnP1oARR8dwiIWNsVZrJpa7QrzJ8c2rQocQwJWxndWdrCgu9W8M8LRdEaiwrTjkShyLr 4RdSZtRiDCdA4qrPI6vK3LXUuxHbQmVd/9sqdYQucVnUImBl4+T6dEYJfJMSE6loqNBebRM4j Ts2oSFaNb07KHA4cgOpENXIEJbr9V101IeYsXzrmFB5sbJ3915fyWphChg+Ln/WqagUHqt0r1 qdQHinY2gM015T8F0r+EAGmYgwGX5XRk0I//5Vcth7ondoN9wdIz5ny5jR/Foeg3UrPY= X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] [fuzzy] X-Received-From: 212.227.126.130 Subject: [Qemu-devel] [PATCH] softfloat: define floatx80_default_inf X-BeenThere: qemu-devel@nongnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Cc: Laurent Vivier , Aurelien Jarno Errors-To: qemu-devel-bounces+importer=patchew.org@nongnu.org Sender: "Qemu-devel" X-ZohoMail: RSF_0 Z_629925259 SPT_0 Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 Content-Type: text/plain; charset="utf-8" Signed-off-by: Laurent Vivier Reviewed-by: Philippe Mathieu-Daud=C3=A9 --- fpu/softfloat-specialize.h | 10 ++++++++++ fpu/softfloat.c | 38 ++++++++++++++++++++++++++------------ include/fpu/softfloat.h | 8 +++++++- 3 files changed, 43 insertions(+), 13 deletions(-) diff --git a/fpu/softfloat-specialize.h b/fpu/softfloat-specialize.h index de2c5d5..139b197 100644 --- a/fpu/softfloat-specialize.h +++ b/fpu/softfloat-specialize.h @@ -178,6 +178,16 @@ floatx80 floatx80_default_nan(float_status *status) } =20 /*------------------------------------------------------------------------= ---- +| The pattern for a default generated extended double-precision inf. +*-------------------------------------------------------------------------= ---*/ + +#define floatx80_default_inf_high 0x7FFF +#define floatx80_default_inf_low LIT64(0x8000000000000000) + +const floatx80 floatx80_default_inf + =3D make_floatx80_init(floatx80_default_inf_high, floatx80_default_inf= _low); + +/*------------------------------------------------------------------------= ---- | The pattern for a default generated quadruple-precision NaN. *-------------------------------------------------------------------------= ---*/ float128 float128_default_nan(float_status *status) diff --git a/fpu/softfloat.c b/fpu/softfloat.c index 7af14e2..67f1dd9 100644 --- a/fpu/softfloat.c +++ b/fpu/softfloat.c @@ -913,7 +913,9 @@ static floatx80 roundAndPackFloatx80(int8_t roundingPre= cision, flag zSign, ) { return packFloatx80( zSign, 0x7FFE, ~ roundMask ); } - return packFloatx80( zSign, 0x7FFF, LIT64( 0x8000000000000000 = ) ); + return packFloatx80(zSign, + floatx80_default_inf_high, + floatx80_default_inf_low); } if ( zExp <=3D 0 ) { isTiny =3D @@ -1885,7 +1887,9 @@ floatx80 float32_to_floatx80(float32 a, float_status = *status) if (aSig) { return commonNaNToFloatx80(float32ToCommonNaN(a, status), stat= us); } - return packFloatx80( aSign, 0x7FFF, LIT64( 0x8000000000000000 ) ); + return packFloatx80(aSign, + floatx80_default_inf_high, + floatx80_default_inf_low); } if ( aExp =3D=3D 0 ) { if ( aSig =3D=3D 0 ) return packFloatx80( aSign, 0, 0 ); @@ -3666,7 +3670,9 @@ floatx80 float64_to_floatx80(float64 a, float_status = *status) if (aSig) { return commonNaNToFloatx80(float64ToCommonNaN(a, status), stat= us); } - return packFloatx80( aSign, 0x7FFF, LIT64( 0x8000000000000000 ) ); + return packFloatx80(aSign, + floatx80_default_inf_high, + floatx80_default_inf_low); } if ( aExp =3D=3D 0 ) { if ( aSig =3D=3D 0 ) return packFloatx80( aSign, 0, 0 ); @@ -4927,8 +4933,8 @@ int64_t floatx80_to_int64(floatx80 a, float_status *s= tatus) if ( shiftCount ) { float_raise(float_flag_invalid, status); if ( ! aSign - || ( ( aExp =3D=3D 0x7FFF ) - && ( aSig !=3D LIT64( 0x8000000000000000 ) ) ) + || ((aExp =3D=3D floatx80_default_inf_high) + && (aSig !=3D floatx80_default_inf_low)) ) { return LIT64( 0x7FFFFFFFFFFFFFFF ); } @@ -5219,7 +5225,9 @@ static floatx80 addFloatx80Sigs(floatx80 a, floatx80 = b, flag zSign, if ((uint64_t)(bSig << 1)) { return propagateFloatx80NaN(a, b, status); } - return packFloatx80( zSign, 0x7FFF, LIT64( 0x8000000000000000 = ) ); + return packFloatx80(zSign, + floatx80_default_inf_high, + floatx80_default_inf_low); } if ( aExp =3D=3D 0 ) ++expDiff; shift64ExtraRightJamming( aSig, 0, - expDiff, &aSig, &zSig1 ); @@ -5294,7 +5302,8 @@ static floatx80 subFloatx80Sigs(floatx80 a, floatx80 = b, flag zSign, if ((uint64_t)(bSig << 1)) { return propagateFloatx80NaN(a, b, status); } - return packFloatx80( zSign ^ 1, 0x7FFF, LIT64( 0x8000000000000000 = ) ); + return packFloatx80(zSign ^ 1, floatx80_default_inf_high, + floatx80_default_inf_low); } if ( aExp =3D=3D 0 ) ++expDiff; shift128RightJamming( aSig, 0, - expDiff, &aSig, &zSig1 ); @@ -5399,7 +5408,8 @@ floatx80 floatx80_mul(floatx80 a, floatx80 b, float_s= tatus *status) return propagateFloatx80NaN(a, b, status); } if ( ( bExp | bSig ) =3D=3D 0 ) goto invalid; - return packFloatx80( zSign, 0x7FFF, LIT64( 0x8000000000000000 ) ); + return packFloatx80(zSign, floatx80_default_inf_high, + floatx80_default_inf_low); } if ( bExp =3D=3D 0x7FFF ) { if ((uint64_t)(bSig << 1)) { @@ -5410,7 +5420,8 @@ floatx80 floatx80_mul(floatx80 a, floatx80 b, float_s= tatus *status) float_raise(float_flag_invalid, status); return floatx80_default_nan(status); } - return packFloatx80( zSign, 0x7FFF, LIT64( 0x8000000000000000 ) ); + return packFloatx80(zSign, floatx80_default_inf_high, + floatx80_default_inf_low); } if ( aExp =3D=3D 0 ) { if ( aSig =3D=3D 0 ) return packFloatx80( zSign, 0, 0 ); @@ -5464,7 +5475,8 @@ floatx80 floatx80_div(floatx80 a, floatx80 b, float_s= tatus *status) } goto invalid; } - return packFloatx80( zSign, 0x7FFF, LIT64( 0x8000000000000000 ) ); + return packFloatx80(zSign, floatx80_default_inf_high, + floatx80_default_inf_low); } if ( bExp =3D=3D 0x7FFF ) { if ((uint64_t)(bSig << 1)) { @@ -5480,7 +5492,8 @@ floatx80 floatx80_div(floatx80 a, floatx80 b, float_s= tatus *status) return floatx80_default_nan(status); } float_raise(float_flag_divbyzero, status); - return packFloatx80( zSign, 0x7FFF, LIT64( 0x8000000000000000 = ) ); + return packFloatx80(zSign, floatx80_default_inf_high, + floatx80_default_inf_low); } normalizeFloatx80Subnormal( bSig, &bExp, &bSig ); } @@ -6303,7 +6316,8 @@ floatx80 float128_to_floatx80(float128 a, float_statu= s *status) if ( aSig0 | aSig1 ) { return commonNaNToFloatx80(float128ToCommonNaN(a, status), sta= tus); } - return packFloatx80( aSign, 0x7FFF, LIT64( 0x8000000000000000 ) ); + return packFloatx80(aSign, floatx80_default_inf_high, + floatx80_default_inf_low); } if ( aExp =3D=3D 0 ) { if ( ( aSig0 | aSig1 ) =3D=3D 0 ) return packFloatx80( aSign, 0, 0= ); diff --git a/include/fpu/softfloat.h b/include/fpu/softfloat.h index f1288ef..f0dff25 100644 --- a/include/fpu/softfloat.h +++ b/include/fpu/softfloat.h @@ -619,6 +619,11 @@ float64 floatx80_to_float64(floatx80, float_status *st= atus); float128 floatx80_to_float128(floatx80, float_status *status); =20 /*------------------------------------------------------------------------= ---- +| The pattern for a default generated extended double-precision inf. +*-------------------------------------------------------------------------= ---*/ +extern const floatx80 floatx80_default_inf; + +/*------------------------------------------------------------------------= ---- | Software IEC/IEEE extended double-precision operations. *-------------------------------------------------------------------------= ---*/ floatx80 floatx80_round_to_int(floatx80, float_status *status); @@ -657,7 +662,8 @@ static inline floatx80 floatx80_chs(floatx80 a) =20 static inline int floatx80_is_infinity(floatx80 a) { - return (a.high & 0x7fff) =3D=3D 0x7fff && a.low =3D=3D 0x8000000000000= 000LL; + return (a.high & 0x7fff) =3D=3D floatx80_default_inf.high && + a.low =3D=3D floatx80_default_inf.low; } =20 static inline int floatx80_is_neg(floatx80 a) --=20 2.9.4