parisc/math-emu/fcnvxf.c

51 	register int src, dst_exponent;
74 	dst_exponent = 16;    /* initialize for normalization */
77 	 * a value in dst_exponent indicating the bit position,
80 	Find_ms_one_bit(src,dst_exponent);
82 	if (dst_exponent >= 0) src <<= dst_exponent;
85 	Sgl_set_exponent(result, 30+SGL_BIAS - dst_exponent);
122 	register int src, dst_exponent;
145 	dst_exponent = 16;    /* initialize for normalization */
148 	 * a value in dst_exponent indicating the bit position,
151 	Find_ms_one_bit(src,dst_exponent);
153 	if (dst_exponent >= 0) src <<= dst_exponent;
157 	Dbl_set_exponent(resultp1, (30+DBL_BIAS) - dst_exponent);
173 	int dst_exponent, srcp1;
196 	dst_exponent = 16;    /* initialize for normalization */
200 		 * a value in dst_exponent indicating the bit position,
203 		Find_ms_one_bit(srcp2,dst_exponent);
205 		if (dst_exponent >= 0) {
206 			srcp1 = srcp2 << dst_exponent;
217 		dst_exponent += 32;
222 		 * a value in dst_exponent indicating the bit position,
226 		Find_ms_one_bit(srcp1,dst_exponent);
228 		if (dst_exponent > 0) {
229 			Variable_shift_double(srcp1,srcp2,(32-dst_exponent),
231 			srcp2 <<= dst_exponent;
234 		 * If dst_exponent = 0, we don't need to shift anything.
235 		 * If dst_exponent = -1, src = - 2**63 so we won't need to
238 		else srcp1 >>= -(dst_exponent);
241 	Sgl_set_exponent(result, (62+SGL_BIAS) - dst_exponent);
278 	register int srcp1, dst_exponent;
301 	dst_exponent = 16;    /* initialize for normalization */
305 		 * a value in dst_exponent indicating the bit position,
308 		Find_ms_one_bit(srcp2,dst_exponent);
310 		if (dst_exponent >= 0) {
311 			srcp1 = srcp2 << dst_exponent;
322 		dst_exponent += 32;
327 		 * a value in dst_exponent indicating the bit position,
330 		Find_ms_one_bit(srcp1,dst_exponent);
332 		if (dst_exponent > 0) {
333 			Variable_shift_double(srcp1,srcp2,(32-dst_exponent),
335 			srcp2 <<= dst_exponent;
338 		 * If dst_exponent = 0, we don't need to shift anything.
339 		 * If dst_exponent = -1, src = - 2**63 so we won't need to
342 		else srcp1 >>= -(dst_exponent);
346 	Dbl_set_exponent(resultp1, (62+DBL_BIAS) - dst_exponent);