libdecnumber/dpd/decimal128.c

81 decimal128 * decimal128FromNumber(decimal128 *d128, const decNumber *dn,
172     UBFROMUI(d128->bytes,    targlo);
173     UBFROMUI(d128->bytes+4,  targml);
174     UBFROMUI(d128->bytes+8,  targmh);
175     UBFROMUI(d128->bytes+12, targhi);
179     UBFROMUI(d128->bytes,    targhi);
180     UBFROMUI(d128->bytes+4,  targmh);
181     UBFROMUI(d128->bytes+8,  targml);
182     UBFROMUI(d128->bytes+12, targlo);
186   /* decimal128Show(d128); */
187   return d128;
192 /*   d128 is the source decimal128				      */
196 decNumber * decimal128ToNumber(const decimal128 *d128, decNumber *dn) {
210     sourlo=UBTOUI(d128->bytes	); /* directly load the low int */
211     sourml=UBTOUI(d128->bytes+4 ); /* then the mid-low */
212     sourmh=UBTOUI(d128->bytes+8 ); /* then the mid-high */
213     sourhi=UBTOUI(d128->bytes+12); /* then the high int */
216     sourhi=UBTOUI(d128->bytes	); /* directly load the high int */
217     sourmh=UBTOUI(d128->bytes+4 ); /* then the mid-high */
218     sourml=UBTOUI(d128->bytes+8 ); /* then the mid-low */
219     sourlo=UBTOUI(d128->bytes+12); /* then the low int */
266 /*   decimal128ToString(d128, string);				      */
267 /*   decimal128ToEngString(d128, string);			      */
269 /*  d128 is the decimal128 format number to convert		      */
276 char * decimal128ToEngString(const decimal128 *d128, char *string){
278   decimal128ToNumber(d128, &dn);
283 char * decimal128ToString(const decimal128 *d128, char *string){
303     sourlo=UBTOUI(d128->bytes	); /* directly load the low int */
304     sourml=UBTOUI(d128->bytes+4 ); /* then the mid-low */
305     sourmh=UBTOUI(d128->bytes+8 ); /* then the mid-high */
306     sourhi=UBTOUI(d128->bytes+12); /* then the high int */
309     sourhi=UBTOUI(d128->bytes	); /* directly load the high int */
310     sourmh=UBTOUI(d128->bytes+4 ); /* then the mid-high */
311     sourml=UBTOUI(d128->bytes+8 ); /* then the mid-low */
312     sourlo=UBTOUI(d128->bytes+12); /* then the low int */
476 /*   d128 is the source decimal128				      */
477 /*   returns 1 if the encoding of d128 is canonical, 0 otherwise      */
480 uInt decimal128IsCanonical(const decimal128 *d128) {
485   decimal128ToNumber(d128, &dn);
487   return memcmp(d128, &canon, DECIMAL128_Bytes)==0;
492 /*   d128 is the source decimal128				      */
497 decimal128 * decimal128Canonical(decimal128 *result, const decimal128 *d128) {
501   decimal128ToNumber(d128, &dn);
535 /*   d128 -- the number to show 				      */
538 void decimal128Show(const decimal128 *d128) {
544       sprintf(&buf[j], "%02x", d128->bytes[15-i]);
547 	   d128->bytes[15]>>7, (d128->bytes[15]>>2)&0x1f,
548 	   ((d128->bytes[15]&0x3)<<10)|(d128->bytes[14]<<2)|
549 	   (d128->bytes[13]>>6));
553       sprintf(&buf[j], "%02x", d128->bytes[i]);
556 	   decimal128Sign(d128), decimal128Comb(d128),
557 	   decimal128ExpCon(d128));