Lines Matching refs:opnd1
54 register unsigned int opnd1, opnd2, result;
58 opnd1 = *srcptr1;
63 if ((opnd1_exponent = Sgl_exponent(opnd1)) == SGL_INFINITY_EXPONENT) {
64 if (Sgl_iszero_mantissa(opnd1)) {
79 if (Sgl_isone_signaling(opnd1)) {
85 Sgl_set_quiet(opnd1);
103 *dstptr = opnd1;
115 *dstptr = opnd1;
149 result = opnd1;
156 if (Sgl_iszero_mantissa(opnd1)) {
157 *dstptr = opnd1;
162 Sgl_normalize(opnd1,opnd1_exponent);
165 Sgl_clear_signexponent_set_hidden(opnd1);
181 * check for opnd1/opnd2 < 1
185 * check for opnd1/opnd2 > 1/2
188 * r = opnd1 - opnd2
190 if (stepcount == -1 && Sgl_isgreaterthan(opnd1,opnd2)) {
192 /* align opnd2 with opnd1 */
194 Sgl_subtract(opnd2,opnd1,opnd2);
204 * opnd1/opnd2 <= 1/2
207 * r = opnd1
209 Sgl_set_exponentmantissa(result,opnd1);
219 while (stepcount-- > 0 && Sgl_all(opnd1)) {
220 if (Sgl_isnotlessthan(opnd1,opnd2))
221 Sgl_subtract(opnd1,opnd2,opnd1);
222 Sgl_leftshiftby1(opnd1);
228 if (Sgl_isnotlessthan(opnd1,opnd2)) {
229 Sgl_subtract(opnd1,opnd2,opnd1);
232 if (stepcount > 0 || Sgl_iszero(opnd1)) {
240 * Check for cases where opnd1/opnd2 < n
243 * opnd1. The mantissa also needs some correction.
245 Sgl_leftshiftby1(opnd1);
246 if (Sgl_isgreaterthan(opnd1,opnd2)) {
248 Sgl_subtract((opnd2<<1),opnd1,opnd1);
251 else if (Sgl_isequal(opnd1,opnd2) && roundup) {
256 while (Sgl_iszero_hidden(opnd1)) {
258 Sgl_leftshiftby1(opnd1);
260 Sgl_set_exponentmantissa(result,opnd1);