gcclibs/libdecnumber/decNumber.c

1462   Int exp;			/* working exponent */
1523       /* calculate the ideal (preferred) exponent [floor(exp/2)] */
1578       exp = f->exponent + f->digits;	/* adjusted to Hull rules */
1596       if ((exp & 1) == 0)
1622 	  exp++;		/* e=e+1 */
1710       a->exponent += exp / 2;	/* set correct exponent */
2005   Int exp = dn->exponent;	/* local copy */
2043       if (exp != 0 || (*dn->lsu == 0 && dn->digits == 1))
2054   if (exp == 0)
2069   pre = dn->digits + exp;	/* digits before '.' */
2071   if ((exp > 0) || (pre < -5))
2073       e = exp + dn->digits - 1;	/* calculate E value */
2673 /*       if exp<0 then if integer divide/residue then leave           */
2694 /*        exp=exp-1                                                   */
2696 /*     exp=exp+1   -- set the proper exponent                         */
3249 		  Int exp = lhs->exponent;	/* save min(exponents) */
3250 		  if (rhs->exponent < exp)
3251 		    exp = rhs->exponent;
3256 		    res->exponent = exp;	/* .. with proper exponent */
3331 		      Int exp, expunits, exprem;	/* work */
3363 		      exp = rhs->exponent - exponent;	/* RHS padding needed */
3365 		      expunits = exp / DECDPUN;
3366 		      exprem = exp % DECDPUN;
4028 decUnitCompare (const Unit * a, Int alength, const Unit * b, Int blength, Int exp)
4037   if (exp == 0)
4058   if (alength > blength + (Int) D2U (exp))
4060   if (alength + 1 < blength + (Int) D2U (exp))
4066   need = blength + D2U (exp);	/* maximum real length of B */
4079   expunits = exp / DECDPUN;
4080   exprem = exp % DECDPUN;
4371   Int d, exp;			/* work */
4391   exp = dn->exponent;
4408 	  /* [if exp>0 then all trailing 0s are significant for trim] */
4409 	  if (exp <= 0)
4411 	      if (exp == 0)
4413 	      exp++;		/* next digit might be significant */
5032 	      /* printf(">> emin=%d exp=%d sdig=%d\n", set->emin, */