53 	register unsigned int opnd1p1, opnd1p2, opnd2p1, opnd2p2;  in dbl_fdiv()  local
60 	Dbl_copyfromptr(srcptr2,opnd2p1,opnd2p2);  in dbl_fdiv()
64 	if (Dbl_sign(opnd1p1) ^ Dbl_sign(opnd2p1))   in dbl_fdiv()
72 			if (Dbl_isnotnan(opnd2p1,opnd2p2)) {  in dbl_fdiv()
73 				if (Dbl_isinfinity(opnd2p1,opnd2p2)) {  in dbl_fdiv()
108 			else if (Dbl_is_signalingnan(opnd2p1)) {  in dbl_fdiv()
114                         	Dbl_set_quiet(opnd2p1);  in dbl_fdiv()
115 				Dbl_copytoptr(opnd2p1,opnd2p2,dstptr);  in dbl_fdiv()
128 	if (Dbl_isinfinity_exponent(opnd2p1)) {  in dbl_fdiv()
129 		if (Dbl_iszero_mantissa(opnd2p1,opnd2p2)) {  in dbl_fdiv()
140                 if (Dbl_isone_signaling(opnd2p1)) {  in dbl_fdiv()
145                         Dbl_set_quiet(opnd2p1);  in dbl_fdiv()
150 		Dbl_copytoptr(opnd2p1,opnd2p2,dstptr);  in dbl_fdiv()
156         if (Dbl_iszero_exponentmantissa(opnd2p1,opnd2p2)) {  in dbl_fdiv()
175 	dest_exponent = Dbl_exponent(opnd1p1) - Dbl_exponent(opnd2p1) + DBL_BIAS;  in dbl_fdiv()
197 	if (Dbl_isnotzero_exponent(opnd2p1)) {  in dbl_fdiv()
198 		Dbl_clear_signexponent_set_hidden(opnd2p1);  in dbl_fdiv()
202                 Dbl_clear_signexponent(opnd2p1);  in dbl_fdiv()
203                 Dbl_leftshiftby1(opnd2p1,opnd2p2);  in dbl_fdiv()
204                 while (Dbl_iszero_hiddenhigh7mantissa(opnd2p1)) {  in dbl_fdiv()
206                         Dbl_leftshiftby8(opnd2p1,opnd2p2);  in dbl_fdiv()
208                 if (Dbl_iszero_hiddenhigh3mantissa(opnd2p1)) {  in dbl_fdiv()
210                         Dbl_leftshiftby4(opnd2p1,opnd2p2);  in dbl_fdiv()
212                 while (Dbl_iszero_hidden(opnd2p1)) {  in dbl_fdiv()
214                         Dbl_leftshiftby1(opnd2p1,opnd2p2);  in dbl_fdiv()
223 	Twoword_subtract(opnd1p1,opnd1p2,opnd2p1,opnd2p2);  in dbl_fdiv()
230 			Twoword_subtract(opnd1p1,opnd1p2,opnd2p1,opnd2p2);  in dbl_fdiv()
233 			Twoword_add(opnd1p1, opnd1p2, opnd2p1, opnd2p2);  in dbl_fdiv()
252 				Twoword_subtract(opnd1p1,opnd1p2,opnd2p1,opnd2p2);  in dbl_fdiv()
255 				Twoword_add(opnd1p1,opnd1p2,opnd2p1,opnd2p2);  in dbl_fdiv()