P 1673 util.c L = (word0(x) & Exp_mask) - (P-1)*Exp_msk1;
P 1880 util.c *e = (de - Bias - (P-1) << 2) + k;
P 1881 util.c *bits = 4*P + 8 - k - hi0bits(word0(d) & Frac_mask);
P 1883 util.c *e = de - Bias - (P-1) + k;
P 1884 util.c *bits = P - k;
P 1889 util.c *e = de - Bias - (P-1) + 1 + k;
P 2305 util.c word0(rv) -= P*Exp_msk1;
P 2308 util.c > Exp_msk1*(DBL_MAX_EXP+Bias-1-P))
P 2310 util.c word0(rv) += P*Exp_msk1;
P 2399 util.c word0(rv) -= P*Exp_msk1;
P 2402 util.c > Exp_msk1*(DBL_MAX_EXP+Bias-P))
P 2404 util.c if (z > Exp_msk1*(DBL_MAX_EXP+Bias-1-P)) {
P 2411 util.c word0(rv) += P*Exp_msk1;
P 2423 util.c scale = 2*P;
P 2427 util.c if (scale && (j = 2*P + 1 - ((word0(rv) & Exp_mask)
P 2433 util.c word0(rv) = (P+2)*Exp_msk1;
P 2505 util.c j += P - Emin;
P 2507 util.c j = P + 1 - bbbits;
P 2511 util.c j = 1 + 4*P - 3 - bbbits + ((bbe + bbbits - 1) & 3);
P 2513 util.c j = P + 1 - bbbits;
P 2519 util.c j += P - Emin;
P 2521 util.c j = P + 1 - bbbits;
P 2578 util.c if (!scale || y > 2*P*Exp_msk1)
P 2591 util.c <= 2*P*Exp_msk1)
P 2592 util.c word0(adj) += (2*P+1)*Exp_msk1 - y;
P 2596 util.c P*Exp_msk1) {
P 2597 util.c word0(rv) += P*Exp_msk1;
P 2599 util.c word0(rv) -= P*Exp_msk1;
P 2621 util.c if (scale && (y = word0(rv) & Exp_mask) <= 2*P*Exp_msk1)
P 2622 util.c word0(adj) += (2*P+1)*Exp_msk1 - y;
P 2625 util.c if ((word0(rv) & Exp_mask) <= P*Exp_msk1) {
P 2626 util.c word0(rv) += P*Exp_msk1;
P 2632 util.c word0(rv) -= P*Exp_msk1;
P 2653 util.c || (word0(rv) & Exp_mask) <= (2*P+1)*Exp_msk1
P 2683 util.c (scale && (y = word0(rv) & Exp_mask) <= 2*P*Exp_msk1)
P 2684 util.c ? (0xffffffff & (0xffffffff << (2*P+1-(y>>Exp_shift)))) :
P 2710 util.c if (L <= (scale ? (2*P+1)*Exp_msk1 : Exp_msk1))
P 2721 util.c if (L <= (2*P+1)*Exp_msk1) {
P 2722 util.c if (L > (P+2)*Exp_msk1)
P 2806 util.c word0(rv) -= P*Exp_msk1;
P 2810 util.c Exp_msk1*(DBL_MAX_EXP+Bias-P)) {
P 2818 util.c word0(rv) += P*Exp_msk1;
P 2822 util.c if (scale && y <= 2*P*Exp_msk1) {
P 2829 util.c word0(aadj1) += (2*P+1)*Exp_msk1 - y;
P 2835 util.c if ((word0(rv) & Exp_mask) <= P*Exp_msk1) {
P 2837 util.c word0(rv) += P*Exp_msk1;
P 2841 util.c if ((word0(rv) & Exp_mask) < P*Exp_msk1)
P 2843 util.c if ((word0(rv) & Exp_mask) <= P*Exp_msk1)
P 2853 util.c word0(rv) -= P*Exp_msk1;
P 2867 util.c if (y <= (P-1)*Exp_msk1 && aadj > 1.) {
P 2914 util.c word0(rv0) = Exp_1 - 2*P*Exp_msk1;
P 3294 util.c i = bbits + be + (Bias + (P-1) - 1);
P 3299 util.c i -= (Bias + (P-1) - 1) + 1;
P 3422 util.c word0(eps) -= (P-1)*Exp_msk1;
P 3540 util.c denorm ? be + (Bias + (P-1) - 1 + 1) :
P 3543 util.c 1 + 4*P - 3 - bbits + ((bbits + be - 1) & 3);
P 3545 util.c 1 + P - bbits;