187 	unsigned int result = 0, srcp2;  in dbl_to_sgl_fcnvxf()  local
189 	Dint_copyfromptr(srcptr,srcp1,srcp2);  in dbl_to_sgl_fcnvxf()
195 		Dint_negate(srcp1,srcp2);  in dbl_to_sgl_fcnvxf()
200         	if (srcp1 == 0 && srcp2 == 0) {  in dbl_to_sgl_fcnvxf()
216 		Find_ms_one_bit(srcp2,dst_exponent);  in dbl_to_sgl_fcnvxf()
219 			srcp1 = srcp2 << dst_exponent;      in dbl_to_sgl_fcnvxf()
220 			srcp2 = 0;  in dbl_to_sgl_fcnvxf()
223 			srcp1 = srcp2 >> 1;  in dbl_to_sgl_fcnvxf()
224 			srcp2 <<= 31;   in dbl_to_sgl_fcnvxf()
242 			Variable_shift_double(srcp1,srcp2,(32-dst_exponent),  in dbl_to_sgl_fcnvxf()
244 			srcp2 <<= dst_exponent;  in dbl_to_sgl_fcnvxf()
257 	if (Dint_isinexact_to_sgl(srcp1,srcp2)) {  in dbl_to_sgl_fcnvxf()
268 				Sgl_roundnearest_from_dint(srcp1,srcp2,result);  in dbl_to_sgl_fcnvxf()
292 	register unsigned int srcp2, resultp1 = 0, resultp2 = 0;  in dbl_to_dbl_fcnvxf()  local
294 	Dint_copyfromptr(srcptr,srcp1,srcp2);  in dbl_to_dbl_fcnvxf()
300 		Dint_negate(srcp1,srcp2);  in dbl_to_dbl_fcnvxf()
305         	if (srcp1 == 0 && srcp2 ==0) {  in dbl_to_dbl_fcnvxf()
321 		Find_ms_one_bit(srcp2,dst_exponent);  in dbl_to_dbl_fcnvxf()
324 			srcp1 = srcp2 << dst_exponent;      in dbl_to_dbl_fcnvxf()
325 			srcp2 = 0;  in dbl_to_dbl_fcnvxf()
328 			srcp1 = srcp2 >> 1;  in dbl_to_dbl_fcnvxf()
329 			srcp2 <<= 31;  in dbl_to_dbl_fcnvxf()
346 			Variable_shift_double(srcp1,srcp2,(32-dst_exponent),  in dbl_to_dbl_fcnvxf()
348 			srcp2 <<= dst_exponent;  in dbl_to_dbl_fcnvxf()
358 	Shiftdouble(srcp1,srcp2,DBL_EXP_LENGTH-1,resultp2);  in dbl_to_dbl_fcnvxf()
362 	if (Dint_isinexact_to_dbl(srcp2)) {  in dbl_to_dbl_fcnvxf()
375 				Dbl_roundnearest_from_dint(srcp2,resultp1,  in dbl_to_dbl_fcnvxf()