54 register unsigned int opnd1, opnd2,
result;
55 register int opnd1_exponent, opnd2_exponent, dest_exponent, stepcount;
154 if (opnd1_exponent == 0) {
167 if (opnd2_exponent == 0) {
177 dest_exponent = opnd2_exponent - 1;
178 stepcount = opnd1_exponent - opnd2_exponent;
201 goto testforunderflow;
210 dest_exponent = opnd1_exponent;
211 goto testforunderflow;
219 while (stepcount-- > 0 &&
Sgl_all(opnd1)) {
266 if (dest_exponent <= 0) {
280 if (dest_exponent >= (1 -
SGL_P)) {