Lines Matching refs:right
55 register unsigned int left, right, result, extent;
64 right = *rightptr;
68 Sgl_xortointp1(left,right,/*to*/save);
77 if (Sgl_isnotnan(right))
79 if (Sgl_isinfinity(right) && save==0)
113 else if (Sgl_is_signalingnan(right))
119 Sgl_set_quiet(right);
120 *dstptr = right;
133 if (Sgl_isinfinity_exponent(right))
135 if (Sgl_iszero_mantissa(right))
138 Sgl_invert_sign(right);
139 *dstptr = right;
145 if (Sgl_isone_signaling(right))
151 Sgl_set_quiet(right);
156 *dstptr = right;
158 } /* End right NaN or Infinity processing */
164 Sgl_copytoint_exponentmantissa(right,signless_upper_right);
171 Sgl_xorfromintp1(save,right,/*to*/right);
176 /* Invariant: left is not smaller than right. */
178 if((right_exponent = Sgl_exponent(right)) == 0)
181 if(Sgl_iszero_mantissa(right))
183 /* right is zero */
187 Sgl_invert_sign(right);
190 Sgl_or_signs(left,/*with*/right);
194 Sgl_and_signs(left,/*with*/right);
220 Sgl_clear_sign(right); /* Exponent is already cleared */
228 Sgl_subtract(left,/*minus*/right,/*into*/result);
245 Sgl_addition(left,right,/*into*/result);
272 Sgl_clear_signexponent_set_hidden(right);
288 /* Align right operand by shifting to right */
289 Sgl_right_align(/*operand*/right,/*shifted by*/diff_exponent,
300 Sgl_subtract_withextension(left,/*minus*/right,/*with*/extent,/*into*/result);
311 * shift is needed, then all bits to the right of the guard
357 * one position right and still not found a one so the remainder
442 Sgl_addition(left,right,/*to*/result);