gcclibs/libdecnumber/decNumber.c

175 const uInt powers[] = { 1, 10, 100, 1000, 10000, 100000, 1000000,
197 #define ueInt uInt		/* unsigned extended integer */
201 static const uInt multies[] = { 131073, 26215, 5243, 1049, 210 };
204 #define QUOT10(u, n) ((((uInt)(u)>>(n))*multies[n])>>17)
220 			    uByte, uInt *);
221 static void decApplyRound (decNumber *, decContext *, Int, uInt *);
224 				decContext *, Flag, uInt *);
226 			Int *, uInt *);
228 			       decContext *, Flag, uInt *);
229 static void decFinalize (decNumber *, decContext *, Int *, uInt *);
237 				 const decNumber *, decContext *, uInt *);
238 static decNumber *decNaNs (decNumber *, const decNumber *, const decNumber *, uInt *);
240 				 const decNumber *, decContext *, Flag, uInt *);
242 			 Int, Int *, uInt *);
243 static void decSetOverflow (decNumber *, decContext *, uInt *);
244 static void decSetSubnormal (decNumber *, decContext *, Int *, uInt *);
247 static void decStatus (decNumber *, uInt, decContext *);
258 static void decFinish (decNumber *, decContext *, Int *, uInt *);
259 static decNumber *decRoundOperand (const decNumber *, decContext *, uInt *);
273 uInt decAllocBytes = 0;		/* count of bytes allocated */
371   uInt status = 0;		/* error code */
656   uInt status = 0;		/* accumulator */
688   uInt status = 0;		/* accumulator */
711   uInt status = 0;		/* accumulator */
734   uInt status = 0;		/* accumulator */
757   uInt status = 0;		/* accumulator */
780   uInt status = 0;		/* accumulator */
803   uInt status = 0;		/* accumulator */
827   uInt status = 0;		/* accumulator */
861   uInt status = 0;		/* accumulator */
892   uInt status = 0;		/* accumulator */
914   uInt status = 0;		/* as usual */
989   uInt needbytes;		/* buffer size needed */
992   uInt status = 0;		/* accumulator */
1266   uInt status = 0;		/* accumulator */
1295   uInt status = 0;		/* accumulator */
1318   uInt status = 0;		/* accumulator */
1341   uInt status = 0;		/* accumulator */
1461   uInt status = 0, ignore = 0;	/* status accumulators */
1464   uInt needbytes;		/* work */
1729 	  uInt mstatus = 0;	/* local status */
1799   uInt status = 0;		/* accumulator */
1838       uInt status = 0;
2011   uInt u, pow;			/* work */
2180 	  u = -e;		/* uInt, please */
2231 	  const decNumber * rhs, decContext * set, uByte negate, uInt * status)
2709 	     decContext * set, Flag op, uInt * status)
2745   uInt const *pow;		/* .. */
3431 	       const decNumber * rhs, decContext * set, uInt * status)
3613 	       const decNumber * rhs, decContext * set, Flag quant, uInt * status)
3796 	      decContext * set, Flag op, uInt * status)
4372   uInt cut;			/* .. */
4398       uInt quot = QUOT10 (*up, cut);
4451   uInt rem;			/* for division */
4453   uInt next;			/* work */
4473       uInt quot = QUOT10 (*source, cut);
4575 decRoundOperand (const decNumber * dn, decContext * set, uInt * status)
4578   uInt newstatus = 0;		/* status from round */
4615 	    Int * residue, uInt * status)
4663 	     Int len, Int * residue, uInt * status)
4666   uInt discard1;		/* first discarded digit */
4667   uInt cut;			/* cut point in Unit */
4668   uInt quot, rem;		/* for divisions */
4673   uInt temp;			/* .. */
4872 decApplyRound (decNumber * dn, decContext * set, Int residue, uInt * status)
4982       uInt count = dn->digits;	/* digits to be checked */
5013       uInt count = dn->digits;	/* digits to be checked */
5080 decFinish (decNumber * dn, decContext * set, Int * residue, uInt * status)
5121 decFinalize (decNumber * dn, decContext * set, Int * residue, uInt * status)
5182 decSetOverflow (decNumber * dn, decContext * set, uInt * status)
5267 		 Int * residue, uInt * status)
5492 decNaNs (decNumber * res, const decNumber * lhs, const decNumber * rhs, uInt * status)
5532 decStatus (decNumber * dn, uInt status, decContext * set)
5567   uInt const *pow;		/* work */
5607   uInt u, d;			/* .. */
5769   uInt maxuint;			/* .. */
5906 decMalloc (uInt n)
5908   uInt size = n + 12;		/* true size */
5910   uInt *j;			/* work */
5918   j = (uInt *) alloc;		/* -> first four bytes */
5943   uInt *j, n;			/* pointer, original length */
5950   j = (uInt *) b0;		/* -> first four bytes */