Lines Matching refs:opnd1
41 register unsigned int opnd1, opnd2, result;
45 opnd1 = *srcptr1;
50 if ((opnd1_exponent = Sgl_exponent(opnd1)) == SGL_INFINITY_EXPONENT) {
51 if (Sgl_iszero_mantissa(opnd1)) {
66 if (Sgl_isone_signaling(opnd1)) {
72 Sgl_set_quiet(opnd1);
90 *dstptr = opnd1;
102 *dstptr = opnd1;
136 result = opnd1;
143 if (Sgl_iszero_mantissa(opnd1)) {
144 *dstptr = opnd1;
149 Sgl_normalize(opnd1,opnd1_exponent);
152 Sgl_clear_signexponent_set_hidden(opnd1);
168 * check for opnd1/opnd2 < 1
172 * check for opnd1/opnd2 > 1/2
175 * r = opnd1 - opnd2
177 if (stepcount == -1 && Sgl_isgreaterthan(opnd1,opnd2)) {
179 /* align opnd2 with opnd1 */
181 Sgl_subtract(opnd2,opnd1,opnd2);
191 * opnd1/opnd2 <= 1/2
194 * r = opnd1
196 Sgl_set_exponentmantissa(result,opnd1);
206 while (stepcount-- > 0 && Sgl_all(opnd1)) {
207 if (Sgl_isnotlessthan(opnd1,opnd2))
208 Sgl_subtract(opnd1,opnd2,opnd1);
209 Sgl_leftshiftby1(opnd1);
215 if (Sgl_isnotlessthan(opnd1,opnd2)) {
216 Sgl_subtract(opnd1,opnd2,opnd1);
219 if (stepcount > 0 || Sgl_iszero(opnd1)) {
227 * Check for cases where opnd1/opnd2 < n
230 * opnd1. The mantissa also needs some correction.
232 Sgl_leftshiftby1(opnd1);
233 if (Sgl_isgreaterthan(opnd1,opnd2)) {
235 Sgl_subtract((opnd2<<1),opnd1,opnd1);
238 else if (Sgl_isequal(opnd1,opnd2) && roundup) {
243 while (Sgl_iszero_hidden(opnd1)) {
245 Sgl_leftshiftby1(opnd1);
247 Sgl_set_exponentmantissa(result,opnd1);