Lines Matching refs:result
57 register unsigned int left, right, result, extent;
88 Sgl_makequietnan(result);
89 *dstptr = result;
201 /* Left is not a zero and must be the result. Trapped
202 * underflows are signaled if left is denormalized. Result
225 /* Both operands are denormalized. The result must be exact
230 Sgl_subtract(left,/*minus*/right,/*into*/result);
231 if(Sgl_iszero_mantissa(result))
235 Sgl_setone_sign(result);
239 Sgl_setzero_sign(result);
241 *dstptr = result;
247 Sgl_addition(left,right,/*into*/result);
248 if(Sgl_isone_hidden(result))
250 *dstptr = result;
256 /* need to normalize result */
257 sign_save = Sgl_signextendedsign(result);
258 Sgl_leftshiftby1(result);
259 Sgl_normalize(result,result_exponent);
260 Sgl_set_sign(result,/*using*/sign_save);
261 Sgl_setwrapped_exponent(result,result_exponent,unfl);
262 *dstptr = result;
266 *dstptr = result;
302 Sgl_subtract_withextension(left,/*minus*/right,/*with*/extent,/*into*/result);
303 if(Sgl_iszero_hidden(result))
306 /* A straight forward algorithm would now shift the result
315 sign_save = Sgl_signextendedsign(result);
316 Sgl_leftshiftby1_withextent(result,extent,result);
318 /* Need to check for a zero result. The sign and exponent
322 if(Sgl_iszero(result))
325 if(Is_rounding_mode(ROUNDMINUS)) Sgl_setone_sign(result);
326 *dstptr = result;
331 if(Sgl_isone_hidden(result))
342 Sgl_set_sign(result,/*using*/sign_save);
358 * modified binary search. We have already shifted the result
362 while(Sgl_iszero_hiddenhigh7mantissa(result))
364 Sgl_leftshiftby8(result);
369 if(Sgl_iszero_hiddenhigh3mantissa(result))
372 Sgl_leftshiftby4(result);
378 if((jumpsize = Sgl_hiddenhigh3mantissa(result)) > 7)
382 Sgl_set_sign(result,/*using*/sign_save);
383 Sgl_set_exponent(result,/*using*/result_exponent);
384 *dstptr = result;
387 Sgl_sethigh4bits(result,/*using*/sign_save);
392 Sgl_leftshiftby3(result);
399 Sgl_leftshiftby2(result);
408 Sgl_leftshiftby1(result);
415 Sgl_set_exponent(result,/*using*/result_exponent);
416 *dstptr = result; /* Sign bit is already set */
423 Sgl_set_sign(result,sign_save);
424 Sgl_setwrapped_exponent(result,result_exponent,unfl);
425 *dstptr = result;
430 * Since we cannot get an inexact denormalized result,
433 Sgl_right_align(result,/*by*/(1-result_exponent),extent);
434 Sgl_clear_signexponent(result);
435 Sgl_set_sign(result,sign_save);
436 *dstptr = result;
444 Sgl_addition(left,right,/*to*/result);
445 if(Sgl_isone_hiddenoverflow(result))
448 Sgl_rightshiftby1_withextent(result,extent,extent);
449 Sgl_arithrightshiftby1(result);
454 /* Round the result. If the extension is all zeros,then the result is
469 Sgl_isone_lowmantissa(result))
472 Sgl_increment(result);
478 if(Sgl_iszero_sign(result))
481 Sgl_increment(result);
486 if(Sgl_isone_sign(result))
489 Sgl_increment(result);
495 if(Sgl_isone_hiddenoverflow(result)) result_exponent++;
502 Sgl_setwrapped_exponent(result,result_exponent,ovfl);
503 *dstptr = result;
515 Sgl_setoverflow(result);
518 else Sgl_set_exponent(result,result_exponent);
519 *dstptr = result;