66 	register int dst_exponent;  in sgl_to_sgl_fcnvuf()  local
79 	dst_exponent = 16;    /* initialize for normalization */  in sgl_to_sgl_fcnvuf()
85 	Find_ms_one_bit(src,dst_exponent);  in sgl_to_sgl_fcnvuf()
87 	src <<= dst_exponent+1;  in sgl_to_sgl_fcnvuf()
89 	Sgl_set_exponent(result, 30+SGL_BIAS - dst_exponent);  in sgl_to_sgl_fcnvuf()
124 	register int dst_exponent;  in sgl_to_dbl_fcnvuf()  local
138 	dst_exponent = 16;    /* initialize for normalization */  in sgl_to_dbl_fcnvuf()
144 	Find_ms_one_bit(src,dst_exponent);  in sgl_to_dbl_fcnvuf()
146 	src <<= dst_exponent+1;  in sgl_to_dbl_fcnvuf()
149 	Dbl_set_exponent(resultp1, (30+DBL_BIAS) - dst_exponent);  in sgl_to_dbl_fcnvuf()
165 	int dst_exponent;  in dbl_to_sgl_fcnvuf()  local
179 	dst_exponent = 16;    /* initialize for normalization */  in dbl_to_sgl_fcnvuf()
186 		Find_ms_one_bit(srcp2,dst_exponent);  in dbl_to_sgl_fcnvuf()
188 		srcp1 = srcp2 << dst_exponent+1;      in dbl_to_sgl_fcnvuf()
194 		dst_exponent += 32;  in dbl_to_sgl_fcnvuf()
203 		Find_ms_one_bit(srcp1,dst_exponent);  in dbl_to_sgl_fcnvuf()
205 		if (dst_exponent >= 0) {  in dbl_to_sgl_fcnvuf()
206 			Variable_shift_double(srcp1,srcp2,(31-dst_exponent),  in dbl_to_sgl_fcnvuf()
208 			srcp2 <<= dst_exponent+1;  in dbl_to_sgl_fcnvuf()
212 	Sgl_set_exponent(result, (62+SGL_BIAS) - dst_exponent);  in dbl_to_sgl_fcnvuf()
247 	register int dst_exponent;  in dbl_to_dbl_fcnvuf()  local
261 	dst_exponent = 16;    /* initialize for normalization */  in dbl_to_dbl_fcnvuf()
268 		Find_ms_one_bit(srcp2,dst_exponent);  in dbl_to_dbl_fcnvuf()
270 		srcp1 = srcp2 << dst_exponent+1;  in dbl_to_dbl_fcnvuf()
276 		dst_exponent += 32;  in dbl_to_dbl_fcnvuf()
284 		Find_ms_one_bit(srcp1,dst_exponent);  in dbl_to_dbl_fcnvuf()
286 		if (dst_exponent >= 0) {  in dbl_to_dbl_fcnvuf()
287 			Variable_shift_double(srcp1,srcp2,(31-dst_exponent),  in dbl_to_dbl_fcnvuf()
289 			srcp2 <<= dst_exponent+1;  in dbl_to_dbl_fcnvuf()
294 	Dbl_set_exponent(resultp1, (62+DBL_BIAS) - dst_exponent);  in dbl_to_dbl_fcnvuf()