Home | History | Annotate | Download | only in dpd

Lines Matching defs:sour

190   uInt sour;			   /* source 32-bit */
194 sour=UBTOUI(d32->bytes); /* directly load the int */
196 comb=(sour>>26)&0x1f; /* combination field */
199 if (sour&0x80000000) dn->bits=DECNEG; /* set sign if negative */
209 else if (sour&0x02000000) dn->bits|=DECSNAN;
214 dn->exponent=(exp<<6)+((sour>>20)&0x3f)-DECIMAL32_Bias; /* unbiased */
218 sour&=0x000fffff; /* clean coefficient continuation */
220 sour|=msd<<20; /* prefix to coefficient */
221 decDigitsFromDPD(dn, &sour, 3); /* process 3 declets */
225 if (!sour) return dn; /* easy: coefficient is 0 */
226 if (sour&0x000ffc00) /* need 2 declets? */
227 decDigitsFromDPD(dn, &sour, 2); /* process 2 declets */
229 decDigitsFromDPD(dn, &sour, 1); /* process 1 declet */
265 uInt sour; /* source 32-bit */
268 sour=UBTOUI(d32->bytes); /* directly load the int */
271 if (((Int)sour)<0) *c++='-'; /* handle sign */
273 comb=(sour>>26)&0x1f; /* combination field */
283 if (sour&0x02000000) *c++='s'; /* sNaN */
286 if ((sour&0x000fffff)==0) return string; /* zero payload */
290 else exp=(exp<<6)+((sour>>20)&0x3f)-DECIMAL32_Bias; /* unbiased */
308 dpd=(sour>>10)&0x3ff; /* declet 1 */
310 dpd=(sour)&0x3ff; /* declet 2 */