1 // SPDX-License-Identifier: GPL-2.0
2 /*---------------------------------------------------------------------------+
9  |                  E-mail   billm@suburbia.net                              |
12  +---------------------------------------------------------------------------*/
14 /*---------------------------------------------------------------------------+
17  |  Each function returns 0 if the answer is o.k., otherwise a non-zero      |
20  +---------------------------------------------------------------------------*/
59 			diff = expa - expb;  in FPU_add()
61 				diff = a->sigh - b->sigh;	/* This works only if the ms bits  in FPU_add()
64 					diff = a->sigl > b->sigl;  in FPU_add()
66 						diff = -(a->sigl < b->sigl);  in FPU_add()
128 /* Subtract b from a.  (a-b) -> dest */
169 		diff = expa - expb;  in FPU_sub()
172 			diff = a->sigh - b->sigh;	/* Works only if ms bits are identical */  in FPU_sub()
174 				diff = a->sigl > b->sigl;  in FPU_sub()
176 					diff = -(a->sigl < b->sigl);  in FPU_sub()
181 		case 0:	/* P - P */  in FPU_sub()
182 		case 3:	/* N - N */  in FPU_sub()
202 		case 1:	/* P - N */  in FPU_sub()
207 		case 2:	/* N - P */  in FPU_sub()
215 			return -1;  in FPU_sub()
291 				setsign(dest, signa);	/* signa may differ from the sign of a. */  in add_sub_specials()
295 			if ((tagb == TW_Denormal) && (b->sigh & 0x80000000)) {  in add_sub_specials()
301 			setsign(dest, signb);	/* signb may differ from the sign of b. */  in add_sub_specials()
307 		if ((taga == TW_Denormal) && (a->sigh & 0x80000000)) {  in add_sub_specials()
313 		setsign(dest, signa);	/* signa may differ from the sign of a. */  in add_sub_specials()
319 			setsign(dest, signa);	/* signa may differ from the sign of a. */  in add_sub_specials()
322 		/* Infinity-Infinity is undefined. */  in add_sub_specials()
326 		setsign(dest, signb);	/* signb may differ from the sign of b. */  in add_sub_specials()