Lines Matching defs:sourhi
203 #define sourhi sourar[3] /* name the word with the sign */
213 sourhi=UBTOUI(d128->bytes+12); /* then the high int */
216 sourhi=UBTOUI(d128->bytes ); /* directly load the high int */
222 comb=(sourhi>>26)&0x1f; /* combination field */
225 if (sourhi&0x80000000) dn->bits=DECNEG; /* set sign if negative */
235 else if (sourhi&0x02000000) dn->bits|=DECSNAN;
240 dn->exponent=(exp<<12)+((sourhi>>14)&0xfff)-DECIMAL128_Bias; /* unbiased */
244 sourhi&=0x00003fff; /* clean coefficient continuation */
246 sourhi|=msd<<14; /* prefix to coefficient */
250 if (sourhi) need=11; /* declets to process */
296 #define sourhi sourar[3] /* name the word with the sign */
306 sourhi=UBTOUI(d128->bytes+12); /* then the high int */
309 sourhi=UBTOUI(d128->bytes ); /* directly load the high int */
316 if (((Int)sourhi)<0) *c++='-'; /* handle sign */
318 comb=(sourhi>>26)&0x1f; /* combination field */
328 if (sourhi&0x02000000) *c++='s'; /* sNaN */
332 && (sourhi&0x0003ffff)==0) return string; /* zero payload */
336 else exp=(exp<<12)+((sourhi>>14)&0xfff)-DECIMAL128_Bias; /* unbiased */
353 dpd=(sourhi>>4)&0x3ff; /* declet 1 */
355 dpd=((sourhi&0xf)<<6) | (sourmh>>26); /* declet 2 */