Mercurial > hg > CbC > CbC_gcc
diff libgcc/config/libbid/bid128_div.c @ 111:04ced10e8804
gcc 7
author | kono |
---|---|
date | Fri, 27 Oct 2017 22:46:09 +0900 |
parents | a06113de4d67 |
children | 84e7813d76e9 |
line wrap: on
line diff
--- a/libgcc/config/libbid/bid128_div.c Sun Aug 21 07:07:55 2011 +0900 +++ b/libgcc/config/libbid/bid128_div.c Fri Oct 27 22:46:09 2017 +0900 @@ -1,4 +1,4 @@ -/* Copyright (C) 2007, 2009 Free Software Foundation, Inc. +/* Copyright (C) 2007-2017 Free Software Foundation, Inc. This file is part of GCC. @@ -36,7 +36,7 @@ BID128_FUNCTION_ARG2 (bid128_div, x, y) UINT256 CA4, CA4r, P256; - UINT128 CX, CY, T128, CQ, CR, CA, TP128, Qh, Ql, res; + UINT128 CX, CY, T128, CQ, CR, CA, TP128, Qh, res; UINT64 sign_x, sign_y, T, carry64, D, Q_high, Q_low, QX, PD, valid_y; int_float fx, fy, f64; @@ -239,7 +239,7 @@ if (d5 < nzeros) nzeros = d5; // get P*(2^M[extra_digits])/10^extra_digits - __mul_128x128_full (Qh, Ql, CQ, reciprocals10_128[nzeros]); + __mul_128x128_high (Qh, CQ, reciprocals10_128[nzeros]); // now get P/10^extra_digits: shift Q_high right by M[extra_digits]-128 amount = recip_scale[nzeros]; @@ -365,7 +365,7 @@ if (nzeros) { // get P*(2^M[extra_digits])/10^extra_digits - __mul_128x128_full (Qh, Ql, CQ, reciprocals10_128[nzeros]); + __mul_128x128_high (Qh, CQ, reciprocals10_128[nzeros]); //now get P/10^extra_digits: shift Q_high right by M[extra_digits]-128 amount = recip_scale[nzeros]; @@ -487,7 +487,7 @@ UINT64, y) UINT256 CA4, CA4r, P256; - UINT128 CX, CY, T128, CQ, CR, CA, TP128, Qh, Ql, res; + UINT128 CX, CY, T128, CQ, CR, CA, TP128, Qh, res; UINT64 sign_x, sign_y, T, carry64, D, Q_high, Q_low, QX, PD, valid_y; int_float fx, fy, f64; @@ -701,7 +701,7 @@ if (d5 < nzeros) nzeros = d5; // get P*(2^M[extra_digits])/10^extra_digits - __mul_128x128_full (Qh, Ql, CQ, reciprocals10_128[nzeros]); + __mul_128x128_high (Qh, CQ, reciprocals10_128[nzeros]); //__mul_128x128_to_256(P256, CQ, reciprocals10_128[nzeros]);Qh.w[1]=P256.w[3];Qh.w[0]=P256.w[2]; // now get P/10^extra_digits: shift Q_high right by M[extra_digits]-128 @@ -829,7 +829,7 @@ if (nzeros) { // get P*(2^M[extra_digits])/10^extra_digits - __mul_128x128_full (Qh, Ql, CQ, reciprocals10_128[nzeros]); + __mul_128x128_high (Qh, CQ, reciprocals10_128[nzeros]); // now get P/10^extra_digits: shift Q_high right by M[extra_digits]-128 amount = recip_scale[nzeros]; @@ -946,7 +946,7 @@ BID128_FUNCTION_ARGTYPE1_ARG128 (bid128dq_div, UINT64, x, y) UINT256 CA4, CA4r, P256; - UINT128 CX, CY, T128, CQ, CR, CA, TP128, Qh, Ql, res; + UINT128 CX, CY, T128, CQ, CR, CA, TP128, Qh, res; UINT64 sign_x, sign_y, T, carry64, D, Q_high, Q_low, QX, valid_y, PD; int_float fx, fy, f64; @@ -1155,7 +1155,7 @@ if (d5 < nzeros) nzeros = d5; // get P*(2^M[extra_digits])/10^extra_digits - __mul_128x128_full (Qh, Ql, CQ, reciprocals10_128[nzeros]); + __mul_128x128_high (Qh, CQ, reciprocals10_128[nzeros]); //__mul_128x128_to_256(P256, CQ, reciprocals10_128[nzeros]);Qh.w[1]=P256.w[3];Qh.w[0]=P256.w[2]; // now get P/10^extra_digits: shift Q_high right by M[extra_digits]-128 @@ -1285,7 +1285,7 @@ if (nzeros) { // get P*(2^M[extra_digits])/10^extra_digits - __mul_128x128_full (Qh, Ql, CQ, reciprocals10_128[nzeros]); + __mul_128x128_high (Qh, CQ, reciprocals10_128[nzeros]); // now get P/10^extra_digits: shift Q_high right by M[extra_digits]-128 amount = recip_scale[nzeros]; @@ -1403,7 +1403,7 @@ BID128_FUNCTION_ARG128_ARGTYPE2 (bid128qd_div, x, UINT64, y) UINT256 CA4, CA4r, P256; - UINT128 CX, CY, T128, CQ, CR, CA, TP128, Qh, Ql, res; + UINT128 CX, CY, T128, CQ, CR, CA, TP128, Qh, res; UINT64 sign_x, sign_y, T, carry64, D, Q_high, Q_low, QX, PD, valid_y; int_float fx, fy, f64; @@ -1607,7 +1607,7 @@ if (d5 < nzeros) nzeros = d5; // get P*(2^M[extra_digits])/10^extra_digits - __mul_128x128_full (Qh, Ql, CQ, reciprocals10_128[nzeros]); + __mul_128x128_high (Qh, CQ, reciprocals10_128[nzeros]); //__mul_128x128_to_256(P256, CQ, reciprocals10_128[nzeros]);Qh.w[1]=P256.w[3];Qh.w[0]=P256.w[2]; // now get P/10^extra_digits: shift Q_high right by M[extra_digits]-128 @@ -1735,7 +1735,7 @@ if (nzeros) { // get P*(2^M[extra_digits])/10^extra_digits - __mul_128x128_full (Qh, Ql, CQ, reciprocals10_128[nzeros]); + __mul_128x128_high (Qh, CQ, reciprocals10_128[nzeros]); // now get P/10^extra_digits: shift Q_high right by M[extra_digits]-128 amount = recip_scale[nzeros];