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