35 	FPU_REG tmp;  in trig_arg()  local
50 	tag = FPU_u_div(st0_ptr, &CONST_PI2, &tmp, PR_64_BITS | RC_CHOP | 0x3f,  in trig_arg()
53 	FPU_round_to_int(&tmp, tag);	/* Fortunately, this can't overflow  in trig_arg()
55 	q = significand(&tmp);  in trig_arg()
58 			   &significand(&tmp),  in trig_arg()
61 		setexponent16(&tmp, exponent(&CONST_PI2));  in trig_arg()
62 		st0_tag = FPU_normalize(&tmp);  in trig_arg()
63 		FPU_copy_to_reg0(&tmp, st0_tag);  in trig_arg()
81 			significand(&tmp) = q + 1;  in trig_arg()
82 			setexponent16(&tmp, 63);  in trig_arg()
83 			FPU_normalize(&tmp);  in trig_arg()
85 			    FPU_u_mul(&CONST_PI2extra, &tmp, &tmp,  in trig_arg()
88 				      exponent(&tmp));  in trig_arg()
89 			setsign(&tmp, getsign(&CONST_PI2extra));  in trig_arg()
90 			st0_tag = FPU_add(&tmp, tmptag, 0, FULL_PRECISION);  in trig_arg()
114 			significand(&tmp) = q;  in trig_arg()
115 			setexponent16(&tmp, 63);  in trig_arg()
116 			FPU_normalize(&tmp);	/* This must return TAG_Valid */  in trig_arg()
118 			    FPU_u_mul(&CONST_PI2extra, &tmp, &tmp,  in trig_arg()
121 				      exponent(&tmp));  in trig_arg()
122 			setsign(&tmp, getsign(&CONST_PI2extra));  in trig_arg()
123 			st0_tag = FPU_sub(LOADED | (tmptag & 0x0f), (int)&tmp,  in trig_arg()
784 		FPU_REG tmp, st0, st1;  in do_fprem()  local
814 				tag = FPU_u_div(&st0, &st1, &tmp,  in do_fprem()
817 				setsign(&tmp, sign);  in do_fprem()
819 				if (exponent(&tmp) >= 0) {  in do_fprem()
820 					FPU_round_to_int(&tmp, tag);	/* Fortunately, this can't  in do_fprem()
822 					q = significand(&tmp);  in do_fprem()
825 						   &significand(&tmp),  in do_fprem()
829 					setexponent16(&tmp, exponent16(&st1));  in do_fprem()
831 					reg_copy(&st0, &tmp);  in do_fprem()
836 				    && (tmp.sigh & 0xc0000000)) {  in do_fprem()
841 					    exponent16(&st1) - exponent16(&tmp);  in do_fprem()
845 							    significand(&tmp);  in do_fprem()
849 							    significand(&tmp);  in do_fprem()
850 						if ((x < significand(&tmp)) ||  in do_fprem()
852 						    ((x == significand(&tmp))  in do_fprem()
855 							significand(&tmp) = x;  in do_fprem()
881 			reg_copy(&st0, &tmp);  in do_fprem()
885 			setexponent16(&tmp, N);  in do_fprem()
890 			sign = getsign(&tmp) ^ st1_sign;  in do_fprem()
892 			    FPU_u_div(&tmp, &st1, &tmp,  in do_fprem()
894 			setsign(&tmp, sign);  in do_fprem()
896 			FPU_round_to_int(&tmp, tag);	/* Fortunately, this can't  in do_fprem()
900 				   &significand(&tmp),  in do_fprem()
902 				   significand(&tmp), exponent(&tmp)  in do_fprem()
904 			setexponent16(&tmp, exp_1 + expdif);  in do_fprem()
911 			if (!(tmp.sigh | tmp.sigl)) {  in do_fprem()
929 		tag = FPU_normalize_nuo(&tmp);  in do_fprem()
930 		reg_copy(&tmp, st0_ptr);  in do_fprem()
934 		if ((exponent16(&tmp) <= EXP_UNDER) && (tag != TAG_Zero)  in do_fprem()
941 		} else if ((exponent16(&tmp) > EXP_UNDER) || (tag == TAG_Zero)) {  in do_fprem()
1490 		FPU_REG tmp;  in fscale()  local
1513 		reg_copy(st1_ptr, &tmp);  in fscale()
1514 		FPU_round_to_int(&tmp, st1_tag);	/* This can never overflow here */  in fscale()
1516 		scale = signnegative(st1_ptr) ? -tmp.sigl : tmp.sigl;  in fscale()