43 	register unsigned int opnd1, opnd2, opnd3, result;  in sgl_fmpy()  local
51 	 * set sign bit of result   in sgl_fmpy()
53 	if (Sgl_sign(opnd1) ^ Sgl_sign(opnd2)) Sgl_setnegativezero(result);    in sgl_fmpy()
54 	else Sgl_setzero(result);  in sgl_fmpy()
69                                 	Sgl_makequietnan(result);  in sgl_fmpy()
70 					*dstptr = result;  in sgl_fmpy()
76 				Sgl_setinfinity_exponentmantissa(result);  in sgl_fmpy()
77 				*dstptr = result;  in sgl_fmpy()
130 			Sgl_setinfinity_exponentmantissa(result);  in sgl_fmpy()
131 			*dstptr = result;  in sgl_fmpy()
166 			Sgl_setzero_exponentmantissa(result);  in sgl_fmpy()
167 			*dstptr = result;  in sgl_fmpy()
182 			Sgl_setzero_exponentmantissa(result);  in sgl_fmpy()
183 			*dstptr = result;  in sgl_fmpy()
209 	/* make sure result is left-justified */  in sgl_fmpy()
214 		/* result mantissa >= 2. */  in sgl_fmpy()
217 	/* check for denormalized result */  in sgl_fmpy()
233 	 * round result   in sgl_fmpy()
239 				if (Sgl_iszero_sign(result))   in sgl_fmpy()
243 				if (Sgl_isone_sign(result))   in sgl_fmpy()
254 	Sgl_set_mantissa(result,opnd3);  in sgl_fmpy()
263                          * Adjust bias of result  in sgl_fmpy()
265 			Sgl_setwrapped_exponent(result,dest_exponent,ovfl);  in sgl_fmpy()
266 			*dstptr = result;  in sgl_fmpy()
275                 /* set result to infinity or largest number */  in sgl_fmpy()
276 		Sgl_setoverflow(result);  in sgl_fmpy()
285                          * Adjust bias of result  in sgl_fmpy()
287 			Sgl_setwrapped_exponent(result,dest_exponent,unfl);  in sgl_fmpy()
288 			*dstptr = result;  in sgl_fmpy()
301 				if (Sgl_iszero_sign(result)) {  in sgl_fmpy()
309 				if (Sgl_isone_sign(result)) {  in sgl_fmpy()
329                  * denormalize result or set to signed zero  in sgl_fmpy()
338 				if (Sgl_iszero_sign(result)) {  in sgl_fmpy()
343 				if (Sgl_isone_sign(result)) {  in sgl_fmpy()
356 		Sgl_set_exponentmantissa(result,opnd3);  in sgl_fmpy()
358 	else Sgl_set_exponent(result,dest_exponent);  in sgl_fmpy()
359 	*dstptr = result;  in sgl_fmpy()