P 1595 util.c L = (word0(x) & Exp_mask) - (P-1)*Exp_msk1;
P 1806 util.c *e = (de - Bias - (P-1) << 2) + k;
P 1807 util.c *bits = 4*P + 8 - k - hi0bits(word0(d) & Frac_mask);
P 1809 util.c *e = de - Bias - (P-1) + k;
P 1810 util.c *bits = P - k;
P 1815 util.c *e = de - Bias - (P-1) + 1 + k;
P 2300 util.c word0(rv) -= P*Exp_msk1;
P 2303 util.c > Exp_msk1*(DBL_MAX_EXP+Bias-1-P))
P 2305 util.c word0(rv) += P*Exp_msk1;
P 2394 util.c word0(rv) -= P*Exp_msk1;
P 2397 util.c > Exp_msk1*(DBL_MAX_EXP+Bias-P))
P 2399 util.c if (z > Exp_msk1*(DBL_MAX_EXP+Bias-1-P)) {
P 2406 util.c word0(rv) += P*Exp_msk1;
P 2418 util.c scale = 2*P;
P 2422 util.c if (scale && (j = 2*P + 1 - ((word0(rv) & Exp_mask)
P 2428 util.c word0(rv) = (P+2)*Exp_msk1;
P 2500 util.c j += P - Emin;
P 2502 util.c j = P + 1 - bbbits;
P 2506 util.c j = 1 + 4*P - 3 - bbbits + ((bbe + bbbits - 1) & 3);
P 2508 util.c j = P + 1 - bbbits;
P 2514 util.c j += P - Emin;
P 2516 util.c j = P + 1 - bbbits;
P 2573 util.c if (!scale || y > 2*P*Exp_msk1)
P 2586 util.c <= 2*P*Exp_msk1)
P 2587 util.c word0(adj) += (2*P+1)*Exp_msk1 - y;
P 2591 util.c P*Exp_msk1) {
P 2592 util.c word0(rv) += P*Exp_msk1;
P 2594 util.c word0(rv) -= P*Exp_msk1;
P 2616 util.c if (scale && (y = word0(rv) & Exp_mask) <= 2*P*Exp_msk1)
P 2617 util.c word0(adj) += (2*P+1)*Exp_msk1 - y;
P 2620 util.c if ((word0(rv) & Exp_mask) <= P*Exp_msk1) {
P 2621 util.c word0(rv) += P*Exp_msk1;
P 2627 util.c word0(rv) -= P*Exp_msk1;
P 2648 util.c || (word0(rv) & Exp_mask) <= (2*P+1)*Exp_msk1
P 2678 util.c (scale && (y = word0(rv) & Exp_mask) <= 2*P*Exp_msk1)
P 2679 util.c ? (0xffffffff & (0xffffffff << (2*P+1-(y>>Exp_shift)))) :
P 2705 util.c if (L <= (scale ? (2*P+1)*Exp_msk1 : Exp_msk1))
P 2716 util.c if (L <= (2*P+1)*Exp_msk1) {
P 2717 util.c if (L > (P+2)*Exp_msk1)
P 2801 util.c word0(rv) -= P*Exp_msk1;
P 2805 util.c Exp_msk1*(DBL_MAX_EXP+Bias-P)) {
P 2813 util.c word0(rv) += P*Exp_msk1;
P 2817 util.c if (scale && y <= 2*P*Exp_msk1) {
P 2824 util.c word0(aadj1) += (2*P+1)*Exp_msk1 - y;
P 2830 util.c if ((word0(rv) & Exp_mask) <= P*Exp_msk1) {
P 2832 util.c word0(rv) += P*Exp_msk1;
P 2836 util.c if ((word0(rv) & Exp_mask) < P*Exp_msk1)
P 2838 util.c if ((word0(rv) & Exp_mask) <= P*Exp_msk1)
P 2848 util.c word0(rv) -= P*Exp_msk1;
P 2862 util.c if (y <= (P-1)*Exp_msk1 && aadj > 1.) {
P 2909 util.c word0(rv0) = Exp_1 - 2*P*Exp_msk1;
P 3287 util.c i = bbits + be + (Bias + (P-1) - 1);
P 3292 util.c i -= (Bias + (P-1) - 1) + 1;
P 3415 util.c word0(eps) -= (P-1)*Exp_msk1;
P 3533 util.c denorm ? be + (Bias + (P-1) - 1 + 1) :
P 3536 util.c 1 + 4*P - 3 - bbits + ((bbits + be - 1) & 3);
P 3538 util.c 1 + P - bbits;