Lines Matching refs:result
55 register unsigned int left, right, result, extent;
86 Sgl_makequietnan(result);
87 *dstptr = result;
199 /* Left is not a zero and must be the result. Trapped
223 /* Both operands are denormalized. The result must be exact
228 Sgl_subtract(left,/*minus*/right,/*into*/result);
229 if(Sgl_iszero_mantissa(result))
233 Sgl_setone_sign(result);
237 Sgl_setzero_sign(result);
239 *dstptr = result;
245 Sgl_addition(left,right,/*into*/result);
246 if(Sgl_isone_hidden(result))
248 *dstptr = result;
254 /* need to normalize result */
255 sign_save = Sgl_signextendedsign(result);
256 Sgl_leftshiftby1(result);
257 Sgl_normalize(result,result_exponent);
258 Sgl_set_sign(result,/*using*/sign_save);
259 Sgl_setwrapped_exponent(result,result_exponent,unfl);
260 *dstptr = result;
264 *dstptr = result;
300 Sgl_subtract_withextension(left,/*minus*/right,/*with*/extent,/*into*/result);
301 if(Sgl_iszero_hidden(result))
304 /* A straight foward algorithm would now shift the result
313 sign_save = Sgl_signextendedsign(result);
314 Sgl_leftshiftby1_withextent(result,extent,result);
316 /* Need to check for a zero result. The sign and exponent
320 if(Sgl_iszero(result))
323 if(Is_rounding_mode(ROUNDMINUS)) Sgl_setone_sign(result);
324 *dstptr = result;
329 if(Sgl_isone_hidden(result))
340 Sgl_set_sign(result,/*using*/sign_save);
356 * modified binary search. We have already shifted the result
360 while(Sgl_iszero_hiddenhigh7mantissa(result))
362 Sgl_leftshiftby8(result);
367 if(Sgl_iszero_hiddenhigh3mantissa(result))
370 Sgl_leftshiftby4(result);
376 if((jumpsize = Sgl_hiddenhigh3mantissa(result)) > 7)
380 Sgl_set_sign(result,/*using*/sign_save);
381 Sgl_set_exponent(result,/*using*/result_exponent);
382 *dstptr = result;
385 Sgl_sethigh4bits(result,/*using*/sign_save);
390 Sgl_leftshiftby3(result);
397 Sgl_leftshiftby2(result);
406 Sgl_leftshiftby1(result);
413 Sgl_set_exponent(result,/*using*/result_exponent);
414 *dstptr = result; /* Sign bit is already set */
421 Sgl_set_sign(result,sign_save);
422 Sgl_setwrapped_exponent(result,result_exponent,unfl);
423 *dstptr = result;
428 * Since we cannot get an inexact denormalized result,
431 Sgl_right_align(result,/*by*/(1-result_exponent),extent);
432 Sgl_clear_signexponent(result);
433 Sgl_set_sign(result,sign_save);
434 *dstptr = result;
442 Sgl_addition(left,right,/*to*/result);
443 if(Sgl_isone_hiddenoverflow(result))
446 Sgl_rightshiftby1_withextent(result,extent,extent);
447 Sgl_arithrightshiftby1(result);
452 /* Round the result. If the extension is all zeros,then the result is
467 Sgl_isone_lowmantissa(result))
470 Sgl_increment(result);
476 if(Sgl_iszero_sign(result))
479 Sgl_increment(result);
484 if(Sgl_isone_sign(result))
487 Sgl_increment(result);
493 if(Sgl_isone_hiddenoverflow(result)) result_exponent++;
500 Sgl_setwrapped_exponent(result,result_exponent,ovfl);
501 *dstptr = result;
512 Sgl_setoverflow(result);
515 else Sgl_set_exponent(result,result_exponent);
516 *dstptr = result;