/netbsd/external/gpl3/gcc.old/dist/libgcc/config/libbid/ |
H A D | bid32_to_bid64.c | 34 UINT32 coefficient_x; 44 res = (coefficient_x & 0x000fffff); 57 (UINT64) coefficient_x); 96 res = (coefficient_x & 0x0003ffffffffffffull); 98 res |= ((coefficient_x >> 32) & 0xfc000000); 119 if (coefficient_x >= 10000000) { 120 tempx.d = (float) coefficient_x; 150 __mul_64x64_to_128 (Q, coefficient_x, 156 coefficient_x = Q.w[1] >> amount; 162 if (coefficient_x & 1) { [all …]
|
H A D | bid64_rem.c | 93 res = coefficient_x & QUIET_MASK64;; 168 if (CY.w[1] || CY.w[0] > (coefficient_x << 1)) { 173 Q = coefficient_x / CY.w[0]; 174 R = coefficient_x - Q * CY.w[0]; 189 tempx.d = (float) coefficient_x; 205 coefficient_x *= power10_table_128[e_scale].w[0]; 208 Q = coefficient_x / coefficient_y; 210 coefficient_x -= Q * coefficient_y; 213 if (!coefficient_x) { 219 R2 = coefficient_x + coefficient_x; [all …]
|
H A D | bid64_string.c | 46 UINT64 sign_x, coefficient_x, D, ER10; local 171 Tmp = coefficient_x >> 59; 172 LO_18Dig = (coefficient_x << 5) >> 5; 405 coefficient_x = (coefficient_x << 1) + (coefficient_x << 3); 406 coefficient_x += (UINT64) (c - '0'); 417 coefficient_x++; 431 if (coefficient_x == 10000000000000000ull) { 432 coefficient_x = 1000000000000000ull; 442 coefficient_x++; 459 coefficient_x, 0, &fpsc); [all …]
|
H A D | bid64_scalb.c | 45 UINT64 sign_x, coefficient_x, res; local 58 if (!unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x)) { 64 if (coefficient_x) 65 res = coefficient_x & QUIET_MASK64; 71 res = very_fast_get_BID64 (sign_x, exponent_x, coefficient_x); // 0 80 res = very_fast_get_BID64 (sign_x, exponent_x, coefficient_x); 86 while ((coefficient_x < 1000000000000000ull) 89 coefficient_x = (coefficient_x << 1) + (coefficient_x << 3); 94 res = very_fast_get_BID64 (sign_x, exponent_x, coefficient_x); 102 res = get_BID64 (sign_x, exponent_x, coefficient_x, rmode, pfpsf);
|
H A D | bid64_quantize.c | 62 valid_x = unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x); 72 if (((coefficient_x << 1) == 0xf000000000000000ull) 74 res = coefficient_x; 107 coefficient_x = 0; 108 res = 0x7c00000000000000ull | (coefficient_x & QUIET_MASK64); 116 tempx.d = (float) coefficient_x; 119 if (coefficient_x >= power10_table_128[digits_x].w[0]) 128 coefficient_x *= power10_table_128[expon_diff].w[0]; 129 res = very_fast_get_BID64 (sign_x, exponent_y, coefficient_x); 145 coefficient_x += round_const_table[rmode][extra_digits]; [all …]
|
H A D | bid64_logb.c | 40 UINT64 sign_x, coefficient_x; local 48 if (!unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x)) { 56 if (coefficient_x >= 1000000000000000ull) { 59 dx.d = (double)coefficient_x; // exact conversion; 62 if (coefficient_x >= power10_table_128[digits].w[0])
|
H A D | bid_inline_add.h | 95 coefficient_b = coefficient_x; in get_add64() 99 coefficient_a = coefficient_x; in get_add64() 829 tempx.d = (double) coefficient_x; in get_add128() 840 coefficient_x = 10000000000000000ull; in get_add128() 850 __mul_64x64_to_128 (CX, coefficient_x, in get_add128() 905 coefficient_x += D; in get_add128() 912 coefficient_x += D; in get_add128() 918 coefficient_x += D; in get_add128() 923 coefficient_x -= D; in get_add128() 924 coefficient_x = in get_add128() [all …]
|
H A D | bid64_mul.c | 61 UINT64 sign_x, sign_y, coefficient_x, coefficient_y; local 78 valid_x = unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x); 96 BID_RETURN (coefficient_x & QUIET_MASK64); 146 if (!coefficient_x) { 164 tempx.d = (double) coefficient_x; 177 C64 = coefficient_x * coefficient_y; 188 __mul_64x64_to_128 (P, coefficient_x, coefficient_y);
|
H A D | bid64_add.c | 123 UINT64 sign_x, sign_y, coefficient_x, coefficient_y, C64_new; local 142 valid_x = unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x); 156 res = coefficient_x & QUIET_MASK64; 164 res = coefficient_x; 187 res = coefficient_x; 213 if (!coefficient_x) { // x==0 239 coefficient_b = coefficient_x; 243 coefficient_a = coefficient_x;
|
H A D | bid64_sqrt.c | 67 UINT64 sign_x, coefficient_x; in bid64_sqrt() local 88 if (!unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x)) { in bid64_sqrt() 91 res = coefficient_x; in bid64_sqrt() 92 if ((coefficient_x & SSNAN_MASK64) == SINFINITY_MASK64) // -Infinity in bid64_sqrt() 111 if (sign_x && coefficient_x) { in bid64_sqrt() 122 tempx.d = (float) coefficient_x; in bid64_sqrt() 126 if (coefficient_x >= power10_index_binexp[bin_expon_cx]) in bid64_sqrt() 129 A10 = coefficient_x; in bid64_sqrt() 152 __mul_64x128_short (CA, coefficient_x, CT); in bid64_sqrt()
|
H A D | bid64_fma.c | 70 UINT64 sign_x, sign_y, coefficient_x, coefficient_y, sign_z, local 89 valid_x = unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x); 211 if (!coefficient_x) { 257 if ((!coefficient_x) || (!coefficient_y)) { 285 tempx.d = (double) coefficient_x; 299 C64 = coefficient_x * coefficient_y; 326 __mul_64x64_to_128 (P, coefficient_x, coefficient_y);
|
H A D | bid32_to_bid128.c | 35 UINT32 coefficient_x; 37 if (!unpack_BID32 (&sign_x, &exponent_x, &coefficient_x, x)) { 43 res.w[0] = (coefficient_x & 0x000fffff); 46 ((((UINT64) coefficient_x) << 32) & 0xfc00000000000000ull); 52 new_coeff.w[0] = coefficient_x;
|
H A D | bid64_to_bid128.c | 35 UINT64 coefficient_x; 37 if (!unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x)) { 43 res.w[0] = (coefficient_x & 0x0003ffffffffffffull); 45 res.w[1] |= ((coefficient_x) & 0xfc00000000000000ull); 50 new_coeff.w[0] = coefficient_x;
|
/netbsd/external/gpl3/gcc/dist/libgcc/config/libbid/ |
H A D | bid32_to_bid64.c | 34 UINT32 coefficient_x; 44 res = (coefficient_x & 0x000fffff); 57 (UINT64) coefficient_x); 96 res = (coefficient_x & 0x0003ffffffffffffull); 98 res |= ((coefficient_x >> 32) & 0xfc000000); 119 if (coefficient_x >= 10000000) { 120 tempx.d = (float) coefficient_x; 150 __mul_64x64_to_128 (Q, coefficient_x, 156 coefficient_x = Q.w[1] >> amount; 162 if (coefficient_x & 1) { [all …]
|
H A D | bid64_rem.c | 93 res = coefficient_x & QUIET_MASK64;; 168 if (CY.w[1] || CY.w[0] > (coefficient_x << 1)) { 173 Q = coefficient_x / CY.w[0]; 174 R = coefficient_x - Q * CY.w[0]; 189 tempx.d = (float) coefficient_x; 205 coefficient_x *= power10_table_128[e_scale].w[0]; 208 Q = coefficient_x / coefficient_y; 210 coefficient_x -= Q * coefficient_y; 213 if (!coefficient_x) { 219 R2 = coefficient_x + coefficient_x; [all …]
|
H A D | bid64_string.c | 46 UINT64 sign_x, coefficient_x, D, ER10; local 171 Tmp = coefficient_x >> 59; 172 LO_18Dig = (coefficient_x << 5) >> 5; 405 coefficient_x = (coefficient_x << 1) + (coefficient_x << 3); 406 coefficient_x += (UINT64) (c - '0'); 417 coefficient_x++; 431 if (coefficient_x == 10000000000000000ull) { 432 coefficient_x = 1000000000000000ull; 442 coefficient_x++; 459 coefficient_x, 0, &fpsc); [all …]
|
H A D | bid64_scalb.c | 45 UINT64 sign_x, coefficient_x, res; local 58 if (!unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x)) { 64 if (coefficient_x) 65 res = coefficient_x & QUIET_MASK64; 71 res = very_fast_get_BID64 (sign_x, exponent_x, coefficient_x); // 0 80 res = very_fast_get_BID64 (sign_x, exponent_x, coefficient_x); 86 while ((coefficient_x < 1000000000000000ull) 89 coefficient_x = (coefficient_x << 1) + (coefficient_x << 3); 94 res = very_fast_get_BID64 (sign_x, exponent_x, coefficient_x); 102 res = get_BID64 (sign_x, exponent_x, coefficient_x, rmode, pfpsf);
|
H A D | bid64_quantize.c | 62 valid_x = unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x); 72 if (((coefficient_x << 1) == 0xf000000000000000ull) 74 res = coefficient_x; 107 coefficient_x = 0; 108 res = 0x7c00000000000000ull | (coefficient_x & QUIET_MASK64); 116 tempx.d = (float) coefficient_x; 119 if (coefficient_x >= power10_table_128[digits_x].w[0]) 128 coefficient_x *= power10_table_128[expon_diff].w[0]; 129 res = very_fast_get_BID64 (sign_x, exponent_y, coefficient_x); 145 coefficient_x += round_const_table[rmode][extra_digits]; [all …]
|
H A D | bid64_logb.c | 40 UINT64 sign_x, coefficient_x; local 48 if (!unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x)) { 56 if (coefficient_x >= 1000000000000000ull) { 59 dx.d = (double)coefficient_x; // exact conversion; 62 if (coefficient_x >= power10_table_128[digits].w[0])
|
H A D | bid_inline_add.h | 95 coefficient_b = coefficient_x; in get_add64() 99 coefficient_a = coefficient_x; in get_add64() 829 tempx.d = (double) coefficient_x; in get_add128() 840 coefficient_x = 10000000000000000ull; in get_add128() 850 __mul_64x64_to_128 (CX, coefficient_x, in get_add128() 905 coefficient_x += D; in get_add128() 912 coefficient_x += D; in get_add128() 918 coefficient_x += D; in get_add128() 923 coefficient_x -= D; in get_add128() 924 coefficient_x = in get_add128() [all …]
|
H A D | bid64_mul.c | 61 UINT64 sign_x, sign_y, coefficient_x, coefficient_y; local 78 valid_x = unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x); 96 BID_RETURN (coefficient_x & QUIET_MASK64); 146 if (!coefficient_x) { 164 tempx.d = (double) coefficient_x; 177 C64 = coefficient_x * coefficient_y; 188 __mul_64x64_to_128 (P, coefficient_x, coefficient_y);
|
H A D | bid64_add.c | 123 UINT64 sign_x, sign_y, coefficient_x, coefficient_y, C64_new; local 142 valid_x = unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x); 156 res = coefficient_x & QUIET_MASK64; 164 res = coefficient_x; 187 res = coefficient_x; 213 if (!coefficient_x) { // x==0 239 coefficient_b = coefficient_x; 243 coefficient_a = coefficient_x;
|
H A D | bid64_sqrt.c | 67 UINT64 sign_x, coefficient_x; in bid64_sqrt() local 88 if (!unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x)) { in bid64_sqrt() 91 res = coefficient_x; in bid64_sqrt() 92 if ((coefficient_x & SSNAN_MASK64) == SINFINITY_MASK64) // -Infinity in bid64_sqrt() 111 if (sign_x && coefficient_x) { in bid64_sqrt() 122 tempx.d = (float) coefficient_x; in bid64_sqrt() 126 if (coefficient_x >= power10_index_binexp[bin_expon_cx]) in bid64_sqrt() 129 A10 = coefficient_x; in bid64_sqrt() 152 __mul_64x128_short (CA, coefficient_x, CT); in bid64_sqrt()
|
H A D | bid64_fma.c | 70 UINT64 sign_x, sign_y, coefficient_x, coefficient_y, sign_z, local 89 valid_x = unpack_BID64 (&sign_x, &exponent_x, &coefficient_x, x); 211 if (!coefficient_x) { 257 if ((!coefficient_x) || (!coefficient_y)) { 285 tempx.d = (double) coefficient_x; 299 C64 = coefficient_x * coefficient_y; 326 __mul_64x64_to_128 (P, coefficient_x, coefficient_y);
|
H A D | bid32_to_bid128.c | 35 UINT32 coefficient_x; 37 if (!unpack_BID32 (&sign_x, &exponent_x, &coefficient_x, x)) { 43 res.w[0] = (coefficient_x & 0x000fffff); 46 ((((UINT64) coefficient_x) << 32) & 0xfc00000000000000ull); 52 new_coeff.w[0] = coefficient_x;
|