382   register FPU_REG *st1_ptr = st0_ptr;  /* anticipate */  in fxtract()  local
394       sign = getsign(st1_ptr);  in fxtract()
395       reg_copy(st1_ptr, st_new_ptr);  in fxtract()
429       sign = getsign(st1_ptr);  in fxtract()
430       FPU_to_exp16(st1_ptr, st_new_ptr);  in fxtract()
865   FPU_REG *st1_ptr = &st(1);  in do_fprem()  local
883       st1_sign = FPU_to_exp16(st1_ptr, &st1);  in do_fprem()
1051     st1_tag = FPU_Special(st1_ptr);  in do_fprem()
1119   real_2op_NaN(st1_ptr, st1_tag, 0, st1_ptr);  in do_fprem()
1127   FPU_REG *st1_ptr = &st(1), exponent;  in fyl2x()  local
1173 	      sign = getsign(st1_ptr);  in fyl2x()
1175 		FPU_to_exp16(st1_ptr, st1_ptr);  in fyl2x()
1178 		setexponent16(st1_ptr, exponent(st1_ptr));  in fyl2x()
1179 	      poly_l2(st0_ptr, st1_ptr, sign);  in fyl2x()
1197     st1_tag = FPU_Special(st1_ptr);  in fyl2x()
1217 	      sign = getsign(st1_ptr)^SIGN_NEG;  in fyl2x()
1221 	      setsign(st1_ptr, sign);  in fyl2x()
1228 	  sign = getsign(st1_ptr);  in fyl2x()
1244 	      setsign(st1_ptr, sign);  in fyl2x()
1271 	  u_char sign = getsign(st1_ptr);  in fyl2x()
1277 	  setsign(st1_ptr, sign);  in fyl2x()
1304 	  changesign(st1_ptr);  in fyl2x()
1315 	  sign = getsign(st1_ptr);  in fyl2x()
1320 	  changesign(st1_ptr);  in fyl2x()
1332   FPU_REG *st1_ptr = &st(1);  in fpatan()  local
1341       poly_atan(st0_ptr, st0_tag, st1_ptr, st1_tag);  in fpatan()
1351     st1_tag = FPU_Special(st1_ptr);  in fpatan()
1375       u_char sign = getsign(st1_ptr);  in fpatan()
1386 		  setpositive(st1_ptr);  in fpatan()
1387 		  tag = FPU_u_add(&CONST_PI4, &CONST_PI2, st1_ptr,  in fpatan()
1402 		  setsign(st1_ptr, sign);   /* An 80486 preserves the sign */  in fpatan()
1420       setsign(st1_ptr, sign);  in fpatan()
1425       u_char sign = getsign(st1_ptr);  in fpatan()
1438       setsign(st1_ptr, sign);  in fpatan()
1443       u_char sign = getsign(st1_ptr);  in fpatan()
1449       setsign(st1_ptr, sign);  in fpatan()
1476   FPU_REG *st1_ptr = &st(1), a, b;  in fyl2xp1()  local
1485       sign1 = getsign(st1_ptr);  in fyl2xp1()
1488       FPU_to_exp16(st1_ptr, &b);  in fyl2xp1()
1490       if ( poly_l2p1(sign, sign1, &a, &b, st1_ptr) )  in fyl2xp1()
1500     st1_tag = FPU_Special(st1_ptr);  in fyl2xp1()
1526 	  setsign(st0_ptr, getsign(st0_ptr) ^ getsign(st1_ptr));  in fyl2xp1()
1560 		  changesign(st1_ptr);  in fyl2xp1()
1569 		changesign(st1_ptr);  in fyl2xp1()
1584 		  changesign(st1_ptr);  in fyl2xp1()
1592 		changesign(st1_ptr);  in fyl2xp1()
1647 	  u_char sign = getsign(st1_ptr);  in fyl2xp1()
1649 	  setsign(st1_ptr, sign);  in fyl2xp1()
1668   FPU_REG *st1_ptr = &st(1);  in fscale()  local
1684       if ( exponent(st1_ptr) > 30 )  in fscale()
1688 	  if ( signpositive(st1_ptr) )  in fscale()
1704       reg_copy(st1_ptr, &tmp);  in fscale()
1707       scale = signnegative(st1_ptr) ? -tmp.sigl : tmp.sigl;  in fscale()
1721     st1_tag = FPU_Special(st1_ptr);  in fscale()
1748 	  if ( signpositive(st1_ptr) )  in fscale()
1756 	  real_2op_NaN(st1_ptr, st1_tag, 0, st0_ptr);  in fscale()
1773 	  if ( signpositive(st1_ptr) )  in fscale()
1778 	  real_2op_NaN(st1_ptr, st1_tag, 0, st0_ptr);  in fscale()
1795 	  if ( signnegative(st1_ptr) )  in fscale()
1800 	  real_2op_NaN(st1_ptr, st1_tag, 0, st0_ptr);  in fscale()
1807 	{ real_2op_NaN(st1_ptr, st1_tag, 0, st0_ptr); return; }  in fscale()