52 	register unsigned int result = 0;  in sgl_to_sgl_fcnvxf()  local
59 		Sgl_setone_sign(result);    in sgl_to_sgl_fcnvxf()
63 		Sgl_setzero_sign(result);  in sgl_to_sgl_fcnvxf()
66                 	Sgl_setzero(result);   in sgl_to_sgl_fcnvxf()
67 			*dstptr = result;  in sgl_to_sgl_fcnvxf()
84 	Sgl_set_mantissa(result, src >> (SGL_EXP_LENGTH-1));  in sgl_to_sgl_fcnvxf()
85 	Sgl_set_exponent(result, 30+SGL_BIAS - dst_exponent);  in sgl_to_sgl_fcnvxf()
91 				if (Sgl_iszero_sign(result))   in sgl_to_sgl_fcnvxf()
92 					Sgl_increment(result);  in sgl_to_sgl_fcnvxf()
95 				if (Sgl_isone_sign(result))   in sgl_to_sgl_fcnvxf()
96 					Sgl_increment(result);  in sgl_to_sgl_fcnvxf()
99 				Sgl_roundnearest_from_int(src,result);  in sgl_to_sgl_fcnvxf()
102 			*dstptr = result;  in sgl_to_sgl_fcnvxf()
107 	*dstptr = result;  in sgl_to_sgl_fcnvxf()
174 	unsigned int result = 0, srcp2;  in dbl_to_sgl_fcnvxf()  local
181 		Sgl_setone_sign(result);    in dbl_to_sgl_fcnvxf()
185 		Sgl_setzero_sign(result);  in dbl_to_sgl_fcnvxf()
188                 	Sgl_setzero(result);  in dbl_to_sgl_fcnvxf()
189                 	*dstptr = result;  in dbl_to_sgl_fcnvxf()
240 	Sgl_set_mantissa(result, srcp1 >> SGL_EXP_LENGTH - 1);  in dbl_to_sgl_fcnvxf()
241 	Sgl_set_exponent(result, (62+SGL_BIAS) - dst_exponent);  in dbl_to_sgl_fcnvxf()
247 				if (Sgl_iszero_sign(result))   in dbl_to_sgl_fcnvxf()
248 					Sgl_increment(result);  in dbl_to_sgl_fcnvxf()
251 				if (Sgl_isone_sign(result))   in dbl_to_sgl_fcnvxf()
252 					Sgl_increment(result);  in dbl_to_sgl_fcnvxf()
255 				Sgl_roundnearest_from_dint(srcp1,srcp2,result);  in dbl_to_sgl_fcnvxf()
258 			*dstptr = result;  in dbl_to_sgl_fcnvxf()
263 	*dstptr = result;  in dbl_to_sgl_fcnvxf()