| /netbsd-src/external/gpl3/gcc/dist/libgcc/config/libbid/ |
| H A D | bid128_scalb.c | 34 UINT128 CX, CX2, CX8, res; 40 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 46 res.w[1] = CX.w[1] & QUIET_MASK64; 47 res.w[0] = CX.w[0]; 48 if (!CX.w[1]) { 53 get_BID128_very_fast (&res, sign_x, exponent_x, CX); 62 get_BID128_very_fast (&res, sign_x, exponent_x, CX); 67 if (CX.w[1] < 0x314dc6448d93ull) { 70 CX8.w[1] = (CX.w[1] << 3) | (CX.w[0] >> 61); 71 CX8.w[0] = CX.w[0] << 3; [all …]
|
| H A D | bid128_rem.c | 31 UINT128 CX, CY, CX2, CQ, CR, T, CXS, P128, res; 42 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 53 res.w[1] = CX.w[1] & QUIET_MASK64; 54 res.w[0] = CX.w[0]; 145 CX2.w[1] = (CX.w[1] << 1) | (CX.w[0] >> 63); 146 CX2.w[0] = CX.w[0] << 1; 155 __div_128_by_128 (&CQ, &CR, CX, P128); 179 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 183 D = CX.w[1] - power10_index_binexp_128[bin_expon_cx].w[1]; 185 || (!D && CX.w[0] >= power10_index_binexp_128[bin_expon_cx].w[0])) [all …]
|
| H A D | bid32_to_bid128.c | 78 UINT128 CX, T128, TP128, Qh, Ql, Qh1, Stemp, Tmp, Tmp1, CX1; 94 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 96 Tmp.w[1] = (CX.w[1] & 0x00003fffffffffffull); 97 Tmp.w[0] = CX.w[0]; 101 res = ((CX.w[1] >> 32) & 0xfc000000) | (Qh.w[1] >> amount); 120 if (CX.w[1] || (CX.w[0] >= 10000000)) { 125 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 129 D = CX.w[1] - power10_index_binexp_128[bin_expon_cx].w[1]; 132 && CX.w[0] >= power10_index_binexp_128[bin_expon_cx].w[0])) 156 __add_carry_out (CX1.w[0], carry, T128.w[0], CX.w[0]); [all …]
|
| H A D | bid64_to_bid128.c | 77 UINT128 CX, T128, TP128, Qh, Ql, Qh1, Stemp, Tmp, Tmp1, CX1; 92 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 94 Tmp.w[1] = (CX.w[1] & 0x00003fffffffffffull); 95 Tmp.w[0] = CX.w[0]; 100 res = (CX.w[1] & 0xfc00000000000000ull) | Tmp.w[0]; 119 if (CX.w[1] || (CX.w[0] >= 10000000000000000ull)) { 124 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 128 D = CX.w[1] - power10_index_binexp_128[bin_expon_cx].w[1]; 131 && CX.w[0] >= power10_index_binexp_128[bin_expon_cx].w[0])) 154 __add_carry_out (CX1.w[0], carry, T128.w[0], CX.w[0]); [all …]
|
| H A D | bid128_quantize.c | 30 UINT128 CX, CY, T, CX2, CR, Stemp, res, REM_H, C2N; 36 valid_x = unpack_BID128_value (&sign_x, &exponent_x, &CX, x); 58 res.w[1] = CX.w[1] & QUIET_MASK64; 59 res.w[0] = CX.w[0]; 77 res.w[1] = CX.w[1] & QUIET_MASK64; 78 res.w[0] = CX.w[0]; 102 res.w[1] = CX.w[1] & QUIET_MASK64; 103 res.w[0] = CX.w[0]; 106 if (!CX.w[1] && !CX.w[0]) { 107 get_BID128_very_fast (&res, sign_x, exponent_y, CX); [all …]
|
| H A D | bid_div_macros.h | 38 __div_128_by_128 (UINT128 * pCQ, UINT128 * pCR, UINT128 CX, UINT128 CY) { in __div_128_by_128() argument 49 if (!CX.w[1]) { in __div_128_by_128() 50 pCQ->w[0] = CX.w[0] / CY.w[0]; in __div_128_by_128() 53 pCR->w[0] = CX.w[0] - pCQ->w[0] * CY.w[0]; in __div_128_by_128() 64 dx = (BINARY80) CX.w[1] * d64.d + (BINARY80) CX.w[0]; in __div_128_by_128() 71 Rh = CX.w[0] - Ql * CY.w[0]; in __div_128_by_128() 84 lx = (BINARY80) CX.w[1] * (BINARY80) t64.d + (BINARY80) CX.w[0]; in __div_128_by_128() 99 pCR->w[1] = CX.w[1]; in __div_128_by_128() 100 pCR->w[0] = CX.w[0]; in __div_128_by_128() 108 __sub_128_128 (CA, CX, CQB); in __div_128_by_128() [all …]
|
| H A D | bid128_sqrt.c | 36 UINT128 CX, CX1, CX2, A10, S2, T128, TP128, CS, CSM, res; 47 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 48 res.w[1] = CX.w[1]; 49 res.w[0] = CX.w[0]; 56 res.w[1] = CX.w[1] & QUIET_MASK64; 61 res.w[1] = CX.w[1]; 94 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 98 A10 = CX; 100 A10.w[1] = (CX.w[1] << 3) | (CX.w[0] >> 61); 101 A10.w[0] = CX.w[0] << 3; [all …]
|
| H A D | bid128_logb.c | 29 UINT128 CX; 35 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 45 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 49 D = CX.w[1] - power10_index_binexp_128[bin_expon_cx].w[1]; 50 if (D > 0 || (!D && CX.w[0] >= power10_index_binexp_128[bin_expon_cx].w[0])) {
|
| H A D | bid128_div.c | 39 UINT128 CX, CY, T128, CQ, CR, CA, TP128, Qh, res; 55 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 63 res.w[1] = (CX.w[1]) & QUIET_MASK64; 64 res.w[0] = CX.w[0]; 148 if (__unsigned_compare_gt_128 (CY, CX)) { 155 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 160 if (CX.w[1]) { 162 __mul_64x128_short (CA, T, CX); 165 __mul_64x128_short (CA, CX.w[0], T128); 181 __div_128_by_128 (&CQ, &CR, CX, CY); [all …]
|
| H A D | bid64_div.c | 523 UINT128 CX, CY, T128, CQ, CQ2, CR, CA, TP128, Qh, Tmp; in bid64_div() local 538 CX.w[1] = 0; in bid64_div() 539 if (!unpack_BID64 (&sign_x, &exponent_x, &CX.w[0], (x))) { in bid64_div() 547 res = CX.w[0]; in bid64_div() 628 if (__unsigned_compare_gt_128 (CY, CX)) { in bid64_div() 635 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; in bid64_div() 640 if (CX.w[1]) { in bid64_div() 642 __mul_64x128_short (CA, T, CX); in bid64_div() 645 __mul_64x128_short (CA, CX.w[0], T128); in bid64_div() 661 __div_128_by_128 (&CQ, &CR, CX, CY); in bid64_div() [all …]
|
| H A D | bid64_sqrt.c | 216 UINT128 CX, CX2, A10, S2, T128, CS, CSM, CS2, C256, CS1, in bid64_sqrt() local 228 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { in bid64_sqrt() 229 res = CX.w[1]; in bid64_sqrt() 236 Tmp.w[1] = (CX.w[1] & 0x00003fffffffffffull); in bid64_sqrt() 237 Tmp.w[0] = CX.w[0]; in bid64_sqrt() 242 res = (CX.w[1] & 0xfc00000000000000ull) | Tmp.w[0]; in bid64_sqrt() 284 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; in bid64_sqrt() 288 A10 = CX; in bid64_sqrt() 290 A10.w[1] = (CX.w[1] << 3) | (CX.w[0] >> 61); in bid64_sqrt() 291 A10.w[0] = CX.w[0] << 3; in bid64_sqrt() [all …]
|
| H A D | bid128_string.c | 279 UINT128 CX, res; local 541 CX.w[0] = 0; 542 CX.w[1] = 0; 549 CX.w[0] = coeff_high; 550 CX.w[1] = 0; 565 __mul_64x64_to_128_fast (CX, coeff_high, scale_high); 567 CX.w[0] += coeff_low; 568 if (CX.w[0] < coeff_low) 569 CX.w[1]++; 571 get_BID128 (&res, sign_x, dec_expon, CX,&rnd_mode,pfpsf); [all …]
|
| /netbsd-src/external/gpl3/gcc.old/dist/libgcc/config/libbid/ |
| H A D | bid128_scalb.c | 34 UINT128 CX, CX2, CX8, res; 40 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 46 res.w[1] = CX.w[1] & QUIET_MASK64; 47 res.w[0] = CX.w[0]; 48 if (!CX.w[1]) { 53 get_BID128_very_fast (&res, sign_x, exponent_x, CX); 62 get_BID128_very_fast (&res, sign_x, exponent_x, CX); 67 if (CX.w[1] < 0x314dc6448d93ull) { 70 CX8.w[1] = (CX.w[1] << 3) | (CX.w[0] >> 61); 71 CX8.w[0] = CX.w[0] << 3; [all …]
|
| H A D | bid128_rem.c | 31 UINT128 CX, CY, CX2, CQ, CR, T, CXS, P128, res; 42 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 53 res.w[1] = CX.w[1] & QUIET_MASK64; 54 res.w[0] = CX.w[0]; 145 CX2.w[1] = (CX.w[1] << 1) | (CX.w[0] >> 63); 146 CX2.w[0] = CX.w[0] << 1; 155 __div_128_by_128 (&CQ, &CR, CX, P128); 179 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 183 D = CX.w[1] - power10_index_binexp_128[bin_expon_cx].w[1]; 185 || (!D && CX.w[0] >= power10_index_binexp_128[bin_expon_cx].w[0])) [all …]
|
| H A D | bid32_to_bid128.c | 78 UINT128 CX, T128, TP128, Qh, Ql, Qh1, Stemp, Tmp, Tmp1, CX1; 94 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 96 Tmp.w[1] = (CX.w[1] & 0x00003fffffffffffull); 97 Tmp.w[0] = CX.w[0]; 101 res = ((CX.w[1] >> 32) & 0xfc000000) | (Qh.w[1] >> amount); 120 if (CX.w[1] || (CX.w[0] >= 10000000)) { 125 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 129 D = CX.w[1] - power10_index_binexp_128[bin_expon_cx].w[1]; 132 && CX.w[0] >= power10_index_binexp_128[bin_expon_cx].w[0])) 156 __add_carry_out (CX1.w[0], carry, T128.w[0], CX.w[0]); [all …]
|
| H A D | bid64_to_bid128.c | 77 UINT128 CX, T128, TP128, Qh, Ql, Qh1, Stemp, Tmp, Tmp1, CX1; 92 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 94 Tmp.w[1] = (CX.w[1] & 0x00003fffffffffffull); 95 Tmp.w[0] = CX.w[0]; 100 res = (CX.w[1] & 0xfc00000000000000ull) | Tmp.w[0]; 119 if (CX.w[1] || (CX.w[0] >= 10000000000000000ull)) { 124 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 128 D = CX.w[1] - power10_index_binexp_128[bin_expon_cx].w[1]; 131 && CX.w[0] >= power10_index_binexp_128[bin_expon_cx].w[0])) 154 __add_carry_out (CX1.w[0], carry, T128.w[0], CX.w[0]); [all …]
|
| H A D | bid128_quantize.c | 30 UINT128 CX, CY, T, CX2, CR, Stemp, res, REM_H, C2N; 36 valid_x = unpack_BID128_value (&sign_x, &exponent_x, &CX, x); 58 res.w[1] = CX.w[1] & QUIET_MASK64; 59 res.w[0] = CX.w[0]; 77 res.w[1] = CX.w[1] & QUIET_MASK64; 78 res.w[0] = CX.w[0]; 102 res.w[1] = CX.w[1] & QUIET_MASK64; 103 res.w[0] = CX.w[0]; 106 if (!CX.w[1] && !CX.w[0]) { 107 get_BID128_very_fast (&res, sign_x, exponent_y, CX); [all …]
|
| H A D | bid_div_macros.h | 38 __div_128_by_128 (UINT128 * pCQ, UINT128 * pCR, UINT128 CX, UINT128 CY) { in __div_128_by_128() argument 49 if (!CX.w[1]) { in __div_128_by_128() 50 pCQ->w[0] = CX.w[0] / CY.w[0]; in __div_128_by_128() 53 pCR->w[0] = CX.w[0] - pCQ->w[0] * CY.w[0]; in __div_128_by_128() 64 dx = (BINARY80) CX.w[1] * d64.d + (BINARY80) CX.w[0]; in __div_128_by_128() 71 Rh = CX.w[0] - Ql * CY.w[0]; in __div_128_by_128() 84 lx = (BINARY80) CX.w[1] * (BINARY80) t64.d + (BINARY80) CX.w[0]; in __div_128_by_128() 99 pCR->w[1] = CX.w[1]; in __div_128_by_128() 100 pCR->w[0] = CX.w[0]; in __div_128_by_128() 108 __sub_128_128 (CA, CX, CQB); in __div_128_by_128() [all …]
|
| H A D | bid128_sqrt.c | 36 UINT128 CX, CX1, CX2, A10, S2, T128, TP128, CS, CSM, res; 47 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 48 res.w[1] = CX.w[1]; 49 res.w[0] = CX.w[0]; 56 res.w[1] = CX.w[1] & QUIET_MASK64; 61 res.w[1] = CX.w[1]; 94 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 98 A10 = CX; 100 A10.w[1] = (CX.w[1] << 3) | (CX.w[0] >> 61); 101 A10.w[0] = CX.w[0] << 3; [all …]
|
| H A D | bid128_logb.c | 29 UINT128 CX; 35 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 45 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 49 D = CX.w[1] - power10_index_binexp_128[bin_expon_cx].w[1]; 50 if (D > 0 || (!D && CX.w[0] >= power10_index_binexp_128[bin_expon_cx].w[0])) {
|
| H A D | bid128_div.c | 39 UINT128 CX, CY, T128, CQ, CR, CA, TP128, Qh, res; 55 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { 63 res.w[1] = (CX.w[1]) & QUIET_MASK64; 64 res.w[0] = CX.w[0]; 148 if (__unsigned_compare_gt_128 (CY, CX)) { 155 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; 160 if (CX.w[1]) { 162 __mul_64x128_short (CA, T, CX); 165 __mul_64x128_short (CA, CX.w[0], T128); 181 __div_128_by_128 (&CQ, &CR, CX, CY); [all …]
|
| H A D | bid64_div.c | 523 UINT128 CX, CY, T128, CQ, CQ2, CR, CA, TP128, Qh, Tmp; in bid64_div() local 538 CX.w[1] = 0; in bid64_div() 539 if (!unpack_BID64 (&sign_x, &exponent_x, &CX.w[0], (x))) { in bid64_div() 547 res = CX.w[0]; in bid64_div() 628 if (__unsigned_compare_gt_128 (CY, CX)) { in bid64_div() 635 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; in bid64_div() 640 if (CX.w[1]) { in bid64_div() 642 __mul_64x128_short (CA, T, CX); in bid64_div() 645 __mul_64x128_short (CA, CX.w[0], T128); in bid64_div() 661 __div_128_by_128 (&CQ, &CR, CX, CY); in bid64_div() [all …]
|
| H A D | bid64_sqrt.c | 216 UINT128 CX, CX2, A10, S2, T128, CS, CSM, CS2, C256, CS1, in bid64_sqrt() local 228 if (!unpack_BID128_value (&sign_x, &exponent_x, &CX, x)) { in bid64_sqrt() 229 res = CX.w[1]; in bid64_sqrt() 236 Tmp.w[1] = (CX.w[1] & 0x00003fffffffffffull); in bid64_sqrt() 237 Tmp.w[0] = CX.w[0]; in bid64_sqrt() 242 res = (CX.w[1] & 0xfc00000000000000ull) | Tmp.w[0]; in bid64_sqrt() 284 fx.d = (float) CX.w[1] * f64.d + (float) CX.w[0]; in bid64_sqrt() 288 A10 = CX; in bid64_sqrt() 290 A10.w[1] = (CX.w[1] << 3) | (CX.w[0] >> 61); in bid64_sqrt() 291 A10.w[0] = CX.w[0] << 3; in bid64_sqrt() [all …]
|
| H A D | bid128_string.c | 279 UINT128 CX, res; local 541 CX.w[0] = 0; 542 CX.w[1] = 0; 549 CX.w[0] = coeff_high; 550 CX.w[1] = 0; 565 __mul_64x64_to_128_fast (CX, coeff_high, scale_high); 567 CX.w[0] += coeff_low; 568 if (CX.w[0] < coeff_low) 569 CX.w[1]++; 571 get_BID128 (&res, sign_x, dec_expon, CX,&rnd_mode,pfpsf); [all …]
|
| /netbsd-src/external/bsd/pcc/dist/pcc/arch/i86/ |
| H A D | order.c | 169 { NOLEFT, CX }, { NORIGHT, CX }, in nspecial() 170 { NEVER, CX }, { 0 } }; in nspecial() 177 { NEVER, DI }, { NEVER, CX }, in nspecial() 242 { NEVER, CX }, { NRES, AXDX }, { 0 } }; in nspecial() 262 { NEVER, CX }, { NRES, AXDX }, { 0 } }; in nspecial() 283 { NEVER, CX }, { NRES, AXDX }, { 0 } }; in nspecial() 291 { NRIGHT, CL }, { NOLEFT, CX }, { 0 } }; in nspecial()
|