65 	register unsigned int result = 0;  in sgl_to_sgl_fcnvxf()  local
72 		Sgl_setone_sign(result);    in sgl_to_sgl_fcnvxf()
76 		Sgl_setzero_sign(result);  in sgl_to_sgl_fcnvxf()
79                 	Sgl_setzero(result);   in sgl_to_sgl_fcnvxf()
80 			*dstptr = result;  in sgl_to_sgl_fcnvxf()
97 	Sgl_set_mantissa(result, src >> (SGL_EXP_LENGTH-1));  in sgl_to_sgl_fcnvxf()
98 	Sgl_set_exponent(result, 30+SGL_BIAS - dst_exponent);  in sgl_to_sgl_fcnvxf()
104 				if (Sgl_iszero_sign(result))   in sgl_to_sgl_fcnvxf()
105 					Sgl_increment(result);  in sgl_to_sgl_fcnvxf()
108 				if (Sgl_isone_sign(result))   in sgl_to_sgl_fcnvxf()
109 					Sgl_increment(result);  in sgl_to_sgl_fcnvxf()
112 				Sgl_roundnearest_from_int(src,result);  in sgl_to_sgl_fcnvxf()
115 			*dstptr = result;  in sgl_to_sgl_fcnvxf()
120 	*dstptr = result;  in sgl_to_sgl_fcnvxf()
187 	unsigned int result = 0, srcp2;  in dbl_to_sgl_fcnvxf()  local
194 		Sgl_setone_sign(result);    in dbl_to_sgl_fcnvxf()
198 		Sgl_setzero_sign(result);  in dbl_to_sgl_fcnvxf()
201                 	Sgl_setzero(result);  in dbl_to_sgl_fcnvxf()
202                 	*dstptr = result;  in dbl_to_sgl_fcnvxf()
253 	Sgl_set_mantissa(result, srcp1 >> SGL_EXP_LENGTH - 1);  in dbl_to_sgl_fcnvxf()
254 	Sgl_set_exponent(result, (62+SGL_BIAS) - dst_exponent);  in dbl_to_sgl_fcnvxf()
260 				if (Sgl_iszero_sign(result))   in dbl_to_sgl_fcnvxf()
261 					Sgl_increment(result);  in dbl_to_sgl_fcnvxf()
264 				if (Sgl_isone_sign(result))   in dbl_to_sgl_fcnvxf()
265 					Sgl_increment(result);  in dbl_to_sgl_fcnvxf()
268 				Sgl_roundnearest_from_dint(srcp1,srcp2,result);  in dbl_to_sgl_fcnvxf()
271 			*dstptr = result;  in dbl_to_sgl_fcnvxf()
276 	*dstptr = result;  in dbl_to_sgl_fcnvxf()