2  * Linux/PA-RISC Project (http://www.parisc-linux.org/)
4  * Floating-point emulation code
5  *  Copyright (C) 2001 Hewlett-Packard (Paul Bame) <bame@debian.org>
19  *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
28  *	Fixed point to Floating-point Converts
51  *  Fixed point to Floating-point Converts				*
55  *  Convert Single Unsigned Fixed to Single Floating-point format
81 	 * Check word for most significant bit set.  Returns  in sgl_to_sgl_fcnvuf()
83 	 * between -1 and 30.  in sgl_to_sgl_fcnvuf()
86 	/*  left justify source, with msb at bit position 0  */  in sgl_to_sgl_fcnvuf()
89 	Sgl_set_exponent(result, 30+SGL_BIAS - dst_exponent);  in sgl_to_sgl_fcnvuf()
114  *  Single Unsigned Fixed to Double Floating-point 
140 	 * Check word for most significant bit set.  Returns  in sgl_to_dbl_fcnvuf()
142 	 * between -1 and 30.  in sgl_to_dbl_fcnvuf()
145 	/*  left justify source, with msb at bit position 0  */  in sgl_to_dbl_fcnvuf()
148 	Dbl_set_mantissap2(resultp2, src << (32-DBL_EXP_LENGTH));  in sgl_to_dbl_fcnvuf()
149 	Dbl_set_exponent(resultp1, (30+DBL_BIAS) - dst_exponent);  in sgl_to_dbl_fcnvuf()
155  *  Double Unsigned Fixed to Single Floating-point 
182 		 * Check word for most significant bit set.  Returns  in dbl_to_sgl_fcnvuf()
184 		 * between -1 and 30.  in dbl_to_sgl_fcnvuf()
187 		/*  left justify source, with msb at bit position 0  */  in dbl_to_sgl_fcnvuf()
198 		 * Check word for most significant bit set.  Returns  in dbl_to_sgl_fcnvuf()
200 		 * between -1 and 30.  in dbl_to_sgl_fcnvuf()
204 		/*  left justify source, with msb at bit position 0  */  in dbl_to_sgl_fcnvuf()
206 			Variable_shift_double(srcp1,srcp2,(31-dst_exponent),  in dbl_to_sgl_fcnvuf()
212 	Sgl_set_exponent(result, (62+SGL_BIAS) - dst_exponent);  in dbl_to_sgl_fcnvuf()
237  *  Double Unsigned Fixed to Double Floating-point 
264 		 * Check word for most significant bit set.  Returns  in dbl_to_dbl_fcnvuf()
266 		 * between -1 and 30.  in dbl_to_dbl_fcnvuf()
269 		/*  left justify source, with msb at bit position 0  */  in dbl_to_dbl_fcnvuf()
280 		 * Check word for most significant bit set.  Returns  in dbl_to_dbl_fcnvuf()
282 		 * between -1 and 30.  in dbl_to_dbl_fcnvuf()
285 		/*  left justify source, with msb at bit position 0  */  in dbl_to_dbl_fcnvuf()
287 			Variable_shift_double(srcp1,srcp2,(31-dst_exponent),  in dbl_to_dbl_fcnvuf()
294 	Dbl_set_exponent(resultp1, (62+DBL_BIAS) - dst_exponent);  in dbl_to_dbl_fcnvuf()