Lines Matching refs:opnd1p1
53 register unsigned int opnd1p1, opnd1p2, opnd2p1, opnd2p2;
59 Dbl_copyfromptr(srcptr1,opnd1p1,opnd1p2);
64 if (Dbl_sign(opnd1p1) ^ Dbl_sign(opnd2p1))
70 if (Dbl_isinfinity_exponent(opnd1p1)) {
71 if (Dbl_iszero_mantissa(opnd1p1,opnd1p2)) {
97 if (Dbl_isone_signaling(opnd1p1)) {
103 Dbl_set_quiet(opnd1p1);
121 Dbl_copytoptr(opnd1p1,opnd1p2,dstptr);
157 if (Dbl_iszero_exponentmantissa(opnd1p1,opnd1p2)) {
175 dest_exponent = Dbl_exponent(opnd1p1) - Dbl_exponent(opnd2p1) + DBL_BIAS;
180 if (Dbl_isnotzero_exponent(opnd1p1)) {
182 Dbl_clear_signexponent_set_hidden(opnd1p1);
186 if (Dbl_iszero_mantissa(opnd1p1,opnd1p2)) {
192 Dbl_clear_signexponent(opnd1p1);
193 Dbl_leftshiftby1(opnd1p1,opnd1p2);
194 Dbl_normalize(opnd1p1,opnd1p2,dest_exponent);
223 Twoword_subtract(opnd1p1,opnd1p2,opnd2p1,opnd2p2);
225 for (count=1; count <= DBL_P && (opnd1p1 || opnd1p2); count++) {
226 Dbl_leftshiftby1(opnd1p1,opnd1p2);
228 if (Dbl_iszero_sign(opnd1p1)) {
230 Twoword_subtract(opnd1p1,opnd1p2,opnd2p1,opnd2p2);
233 Twoword_add(opnd1p1, opnd1p2, opnd2p1, opnd2p2);
248 Dbl_leftshiftby1(opnd1p1,opnd1p2);
250 if (Dbl_iszero_sign(opnd1p1)) {
252 Twoword_subtract(opnd1p1,opnd1p2,opnd2p1,opnd2p2);
255 Twoword_add(opnd1p1,opnd1p2,opnd2p1,opnd2p2);
259 if (Dbl_iszero_sign(opnd1p1)) guardbit = TRUE;
260 stickybit = Dbl_allp1(opnd1p1) || Dbl_allp2(opnd1p2);