h 4979 src/decNumber/decNumber.c Int h; // adjusted exponent for 0.xxxx h 5067 src/decNumber/decNumber.c h=rhs->exponent+rhs->digits; h 5073 src/decNumber/decNumber.c if (h>8) { // overflow/underflow h 5080 src/decNumber/decNumber.c h=8; // clamp so 10**h computable h 5095 src/decNumber/decNumber.c Int lever=MINI(8-h, maxlever); // leverage attainable h 5097 src/decNumber/decNumber.c h+=lever; // apply leverage selected h 5098 src/decNumber/decNumber.c if (h<0) { // clamp h 5099 src/decNumber/decNumber.c use+=h; // [may end up subnormal] h 5100 src/decNumber/decNumber.c h=0; h 5129 src/decNumber/decNumber.c p=MAXI(x->digits, set->digits)+h+2; // [h<=8] h 5192 src/decNumber/decNumber.c if (h>0) { h 5195 src/decNumber/decNumber.c Int n=powers[h]; // always positive h 41 src/dps8/dps8.h typedef struct { uint64_t h; uint64_t l; } x__uint128_t; h 42 src/dps8/dps8.h typedef struct { int64_t h; uint64_t l; } x__int128_t; h 43 src/dps8/dps8.h # define construct_128(h, l) ((uint128) { (h), (l) }) h 44 src/dps8/dps8.h # define construct_s128(h, l) ((int128) { (h), (l) }) h 341 src/dps8/dps8_crdrdr.c h 345 src/dps8/dps8_crdrdr.c h 346 src/dps8/dps8_crdrdr.c h 330 src/dps8/dps8_hw_consts.h return (int128) { (uint64_t) v.h, v.l}; h 332 src/dps8/dps8_hw_consts.h return (int128) { (int64_t) v.h, v.l}; h 334 src/dps8/dps8_hw_consts.h return (int128) { (__int64_t) v.h, v.l}; h 3548 src/dps8/dps8_math.c if (sm1.h < 0) h 3551 src/dps8/dps8_math.c if (sm2.h < 0) h 40 src/dps8/dps8_math128.c if (w.h || w.l) h 47 src/dps8/dps8_math128.c if (w.h || w.l) h 54 src/dps8/dps8_math128.c return a.h == b.h && a.l == b.l; h 59 src/dps8/dps8_math128.c if (a.h > b.h) return true; h 60 src/dps8/dps8_math128.c if (a.h < b.h) return false; h 67 src/dps8/dps8_math128.c if (a.h < b.h) return true; h 68 src/dps8/dps8_math128.c if (a.h > b.h) return false; h 75 src/dps8/dps8_math128.c if (a.h > b.h) return true; h 76 src/dps8/dps8_math128.c if (a.h < b.h) return false; h 83 src/dps8/dps8_math128.c if (a.h < b.h) return true; h 84 src/dps8/dps8_math128.c if (a.h > b.h) return false; h 91 src/dps8/dps8_math128.c if (a.h > b.h) return true; h 92 src/dps8/dps8_math128.c if (a.h < b.h) return false; h 99 src/dps8/dps8_math128.c return (uint128) {a.h & b.h, a.l & b.l}; h 104 src/dps8/dps8_math128.c return (int128) {a.h & (int64_t)b.h, a.l & b.l}; h 109 src/dps8/dps8_math128.c return (uint128) {a.h | b.h, a.l | b.l}; h 114 src/dps8/dps8_math128.c return (uint128) {a.h ^ b.h, a.l ^ b.l}; h 119 src/dps8/dps8_math128.c return (uint128) {~ a.h, ~ a.l}; h 141 src/dps8/dps8_math128.c uint64_t h64 = a.h + b.h + c64; // compute the high h 150 src/dps8/dps8_math128.c uint128 res = construct_128 (a.h - b.h, a.l - b.l); h 152 src/dps8/dps8_math128.c res.h --; h 186 src/dps8/dps8_math128.c uint64_t h = a.h << n; h 189 src/dps8/dps8_math128.c h |= keep; h 191 src/dps8/dps8_math128.c return construct_128 (h, l); h 193 src/dps8/dps8_math128.c uint64_t h = a.l << (n - 64); h 194 src/dps8/dps8_math128.c return construct_128 (h, 0); h 206 src/dps8/dps8_math128.c h 211 src/dps8/dps8_math128.c h 219 src/dps8/dps8_math128.c h 226 src/dps8/dps8_math128.c h 231 src/dps8/dps8_math128.c h 232 src/dps8/dps8_math128.c h 236 src/dps8/dps8_math128.c h 238 src/dps8/dps8_math128.c h 239 src/dps8/dps8_math128.c h 253 src/dps8/dps8_math128.c uint64_t h = a.h; h 255 src/dps8/dps8_math128.c uint64_t sign = a.h & SIGN64; h 258 src/dps8/dps8_math128.c uint64_t b = (h & 1) ? SIGN64 : 0; h 259 src/dps8/dps8_math128.c h >>= 1; h 260 src/dps8/dps8_math128.c h |= sign; h 266 src/dps8/dps8_math128.c return construct_128 (h, l); h 481 src/dps8/dps8_math128.c u[3] = (uint32_t) (a.h >> 32); h 482 src/dps8/dps8_math128.c u[2] = (uint32_t) a.h; h 485 src/dps8/dps8_math128.c v[3] = (uint32_t) (b.h >> 32); h 486 src/dps8/dps8_math128.c v[2] = (uint32_t) b.h; h 501 src/dps8/dps8_math128.c u[3] = (uint32_t) (a.h >> 32); h 502 src/dps8/dps8_math128.c u[2] = (uint32_t) a.h; h 505 src/dps8/dps8_math128.c v[3] = (uint32_t) (b.h >> 32); h 506 src/dps8/dps8_math128.c v[2] = (uint32_t) b.h; h 525 src/dps8/dps8_math128.c u[4] = (uint16_t) a.h; h 526 src/dps8/dps8_math128.c u[5] = (uint16_t) (a.h >> 16); h 527 src/dps8/dps8_math128.c u[6] = (uint16_t) (a.h >> 32); h 528 src/dps8/dps8_math128.c u[7] = (uint16_t) (a.h >> 48); h 534 src/dps8/dps8_math128.c v[4] = (uint16_t) b.h; h 535 src/dps8/dps8_math128.c v[5] = (uint16_t) (b.h >> 16); h 536 src/dps8/dps8_math128.c v[6] = (uint16_t) (b.h >> 32); h 537 src/dps8/dps8_math128.c v[7] = (uint16_t) (b.h >> 48); h 580 src/dps8/dps8_math128.c u[4] = (uint16_t) a.h; h 581 src/dps8/dps8_math128.c u[5] = (uint16_t) (a.h >> 16); h 582 src/dps8/dps8_math128.c u[6] = (uint16_t) (a.h >> 32); h 583 src/dps8/dps8_math128.c u[7] = (uint16_t) (a.h >> 48); h 616 src/dps8/dps8_math128.c u[4] = (uint16_t) a.h; h 617 src/dps8/dps8_math128.c u[5] = (uint16_t) (a.h >> 16); h 618 src/dps8/dps8_math128.c u[6] = (uint16_t) (a.h >> 32); h 619 src/dps8/dps8_math128.c u[7] = (uint16_t) (a.h >> 48); h 643 src/dps8/dps8_math128.c static void tisz (uint64_t h, uint64_t l, bool expect) h 645 src/dps8/dps8_math128.c bool r = iszero_128 (construct_128 (h, l)); h 650 src/dps8/dps8_math128.c (unsigned long long)h, (unsigned long long)l, (unsigned long)r); h 662 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { h 666 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); h 678 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { h 682 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); h 693 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { h 696 src/dps8/dps8_math128.c (unsigned long long)ah, (unsigned long long)al, (unsigned long long)r.h, h 709 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { h 713 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); h 725 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { h 729 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); h 740 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { h 743 src/dps8/dps8_math128.c (unsigned long long)ah, (unsigned long long)al, (unsigned long long)r.h, h 771 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { h 775 src/dps8/dps8_math128.c (unsigned long long)r.h, (unsigned long long)r.l); h 786 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { h 790 src/dps8/dps8_math128.c (unsigned long long)r.h, (unsigned long long)r.l); h 802 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { h 806 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); h 818 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { h 822 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); h 835 src/dps8/dps8_math128.c if (res.h != resh || res.l != resl || rem != remainder) { h 839 src/dps8/dps8_math128.c (unsigned long long)res.h, (unsigned long long)res.l, rem); h 852 src/dps8/dps8_math128.c if (res.h != resh || res.l != resl || rem != remainder) { h 856 src/dps8/dps8_math128.c (unsigned long long)res.h, (unsigned long long)res.l, rem); h 26 src/dps8/dps8_math128.h # define cast_128(x) construct_128 ((uint64_t) (x).h, (x).l) h 27 src/dps8/dps8_math128.h # define cast_s128(x) construct_s128 ((int64_t) (x).h, (x).l) h 1091 src/dps8/dps8_utils.c sim_debug (DBG_TRACEEXT, & cpu_dev, "op1 %016"PRIx64"%016"PRIx64"\n", op1.h, op1.l); h 1092 src/dps8/dps8_utils.c sim_debug (DBG_TRACEEXT, & cpu_dev, "op2 %016"PRIx64"%016"PRIx64"\n", op2.h, op2.l); h 1095 src/dps8/dps8_utils.c sim_debug (DBG_TRACEEXT, & cpu_dev, "op1s %016"PRIx64"%016"PRIx64"\n", op1s.h, op1s.l); h 1096 src/dps8/dps8_utils.c sim_debug (DBG_TRACEEXT, & cpu_dev, "op2s %016"PRIx64"%016"PRIx64"\n", op2s.h, op2s.l); h 186 src/dps8/h316_imp.h # define MKWORD(h,l) ((uint16_t) ( (((h)&0xFF) << 8) | ((l)&0xFF) )) h 189 src/dps8/h316_imp.h # define MKLONG(h,l) ((uint32_t) ( (((h)&0xFFFF) << 16) | ((l)&0xFFFF) ))