28 int add_sub_specials(FPU_REG const *a, u_char taga, u_char signa,
38 	FPU_REG *a = &st(0);  in FPU_add()  local
42 	u_char signa = getsign(a);  in FPU_add()
47 		expa = exponent(a);  in FPU_add()
55 			    FPU_u_add(a, b, dest, control_w, signa, expa, expb);  in FPU_add()
60 				diff = a->sigh - b->sigh;	/* This works only if the ms bits  in FPU_add()
63 					diff = a->sigl > b->sigl;  in FPU_add()
65 						diff = -(a->sigl < b->sigl);  in FPU_add()
71 				    FPU_u_sub(a, b, dest, control_w, signa,  in FPU_add()
75 				    FPU_u_sub(b, a, dest, control_w, signb,  in FPU_add()
95 		taga = FPU_Special(a);  in FPU_add()
107 		FPU_to_exp16(a, &x);  in FPU_add()
109 		a = &x;  in FPU_add()
111 		expa = exponent16(a);  in FPU_add()
118 			return real_2op_NaN(b, tagb, deststnr, a);  in FPU_add()
120 			return real_2op_NaN(a, taga, deststnr, a);  in FPU_add()
123 	return add_sub_specials(a, taga, signa, b, tagb, signb,  in FPU_add()
130 	FPU_REG const *a, *b;  in FPU_sub()  local
135 	a = &st(0);  in FPU_sub()
150 	signa = getsign(a);  in FPU_sub()
162 		expa = exponent(a);  in FPU_sub()
171 			diff = a->sigh - b->sigh;	/* Works only if ms bits are identical */  in FPU_sub()
173 				diff = a->sigl > b->sigl;  in FPU_sub()
175 					diff = -(a->sigl < b->sigl);  in FPU_sub()
185 				    FPU_u_sub(a, b, dest, control_w, signa,  in FPU_sub()
197 				    FPU_u_sub(b, a, dest, control_w, sign, expb,  in FPU_sub()
203 			    FPU_u_add(a, b, dest, control_w, SIGN_POS, expa,  in FPU_sub()
208 			    FPU_u_add(a, b, dest, control_w, SIGN_NEG, expa,  in FPU_sub()
226 		taga = FPU_Special(a);  in FPU_sub()
238 		FPU_to_exp16(a, &x);  in FPU_sub()
240 		a = &x;  in FPU_sub()
242 		expa = exponent16(a);  in FPU_sub()
252 			d2 = a;  in FPU_sub()
254 			d1 = a;  in FPU_sub()
260 			return real_2op_NaN(a, taga, deststnr, d2);  in FPU_sub()
265 	return add_sub_specials(a, taga, signa, b, tagb, signb ^ SIGN_NEG,  in FPU_sub()
270 int add_sub_specials(FPU_REG const *a, u_char taga, u_char signa,  in add_sub_specials()  argument
283 			FPU_copy_to_regi(a, TAG_Zero, deststnr);  in add_sub_specials()
305 		reg_copy(a, dest);  in add_sub_specials()
306 		if ((taga == TW_Denormal) && (a->sigh & 0x80000000)) {  in add_sub_specials()
317 			FPU_copy_to_regi(a, TAG_Special, deststnr);  in add_sub_specials()