exponent16
if (exponent16(dest) <= EXP_UNDER - 63) {
e = exponent16(st0_ptr);
scale += exponent16(st0_ptr);
e = exponent16(st_new_ptr);
expon = exponent16(st0_ptr);
expdif = exponent16(&st0) - exponent16(&st1);
setexponent16(&tmp, exponent16(&st1));
exponent16(&st1) - exponent16(&tmp);
exp_1 = exponent16(&st1);
if ((exponent16(&tmp) <= EXP_UNDER) && (tag != TAG_Zero)
} else if ((exponent16(&tmp) > EXP_UNDER) || (tag == TAG_Zero)) {
exponent = exponent16(arg);
exponent = exponent16(st0_ptr);
exponent -= exponent16(st1_ptr);
if (exponent16(st0_ptr) < 0) {
exponent += exponent16(st1_ptr) + 1;
exponent = exponent16(arg);
exponent = exponent16(st0_ptr);
setexponent16(st1_ptr, expon_expon + exponent16(st1_ptr) + 1);
expa = exponent16(a);
expb = exponent16(b);
expa = exponent16(a);
expb = exponent16(b);
exp0 = exponent16(st0_ptr);
expb = exponent16(b);
if (exponent16(x) == EXP_UNDER) {
FPU_put_user(exponent16(st0_ptr),
exp = exponent16(ptr) & 0x7fff;
exponent16(&x) + exponent16(&y));