Lines Matching refs:df
242 static decFloat * decFinalize(decFloat *df, bcdnum *num, in decFinalize() argument
495 return decFloatFromBCD(df, num->exponent, umsd, num->sign); in decFinalize()
533 DFWORD(df, 0)=encode; /* just the one word */ in decFinalize()
538 DFWORD(df, 0)=encode; in decFinalize()
543 DFWORD(df, 1)=encode; in decFinalize()
548 DFWORD(df, 0)=encode; in decFinalize()
554 DFWORD(df, 1)=encode; in decFinalize()
560 DFWORD(df, 2)=encode; in decFinalize()
566 DFWORD(df, 3)=encode; in decFinalize()
571 return df; in decFinalize()
589 decFloat * decFloatFromBCD(decFloat *df, Int exp, const uByte *bcdar, in decFloatFromBCD() argument
621 DFWORD(df, 0)=encode; /* just the one word */ in decFloatFromBCD()
626 DFWORD(df, 0)=encode; in decFloatFromBCD()
631 DFWORD(df, 1)=encode; in decFloatFromBCD()
636 DFWORD(df, 0)=encode; in decFloatFromBCD()
642 DFWORD(df, 1)=encode; in decFloatFromBCD()
648 DFWORD(df, 2)=encode; in decFloatFromBCD()
654 DFWORD(df, 3)=encode; in decFloatFromBCD()
657 return df; in decFloatFromBCD()
676 decFloat * decFloatFromPacked(decFloat *df, Int exp, const uByte *packed) { in decFloatFromPacked() argument
699 return decFloatFromBCD(df, exp, bcdar+1, sig); in decFloatFromPacked()
720 decFloat * decFloatFromPackedChecked(decFloat *df, Int exp, in decFloatFromPackedChecked() argument
763 return decFloatFromBCD(df, exp, bcdar+1, sig); in decFloatFromPackedChecked()
1071 Int decFloatGetCoefficient(const decFloat *df, uByte *bcdar) { in decFloatGetCoefficient() argument
1072 if (DFISINF(df)) memset(bcdar, 0, DECPMAX); in decFloatGetCoefficient()
1074 GETCOEFF(df, bcdar); /* use macro */ in decFloatGetCoefficient()
1075 if (DFISNAN(df)) bcdar[0]=0; /* MSD needs correcting */ in decFloatGetCoefficient()
1077 return DFISSIGNED(df); in decFloatGetCoefficient()
1091 Int decFloatGetExponent(const decFloat *df) { in decFloatGetExponent() argument
1092 if (DFISSPECIAL(df)) return DFWORD(df, 0)&0x7e000000; in decFloatGetExponent()
1093 return GETEXPUN(df); in decFloatGetExponent()
1108 decFloat * decFloatSetCoefficient(decFloat *df, const uByte *bcdar, in decFloatSetCoefficient() argument
1114 if (DFISSPECIAL(df)) { in decFloatSetCoefficient()
1115 exp=DFWORD(df, 0)&0x7e000000; in decFloatSetCoefficient()
1116 if (DFISINF(df)) { in decFloatSetCoefficient()
1118 return decFloatFromBCD(df, exp, bcdzero, sig); in decFloatSetCoefficient()
1121 else exp=GETEXPUN(df); in decFloatSetCoefficient()
1122 return decFloatFromBCD(df, exp, bcdar, sig); in decFloatSetCoefficient()
1136 decFloat * decFloatSetExponent(decFloat *df, decContext *set, Int exp) { in decFloatSetExponent() argument
1140 num.sign=decFloatGetCoefficient(df, bcdcopy); /* extract coefficient */ in decFloatSetExponent()
1141 if (DFISSPECIAL(df)) { /* MSD or more needs correcting */ in decFloatSetExponent()
1142 if (DFISINF(df)) memset(bcdcopy, 0, DECPMAX); in decFloatSetExponent()
1147 return decFinalize(df, &num, set); in decFloatSetExponent()
1155 uInt decFloatRadix(const decFloat *df) { in decFloatRadix() argument
1156 if (df) return 10; /* to placate compiler */ in decFloatRadix()
1168 void decFloatShow(const decFloat *df, const char *tag) { in decFloatShow() argument
1175 sprintf(&hexbuf[j], "%02x", df->bytes[DECBYTES-1-i]); in decFloatShow()
1177 sprintf(&hexbuf[j], "%02x", df->bytes[i]); in decFloatShow()
1183 decFloatToString(df, buff); in decFloatShow()
1203 Int decFloatToBCD(const decFloat *df, Int *exp, uByte *bcdar) { in decFloatToBCD() argument
1204 if (DFISINF(df)) { in decFloatToBCD()
1206 *exp=DFWORD(df, 0)&0x7e000000; in decFloatToBCD()
1209 GETCOEFF(df, bcdar); /* use macro */ in decFloatToBCD()
1210 if (DFISNAN(df)) { in decFloatToBCD()
1212 *exp=DFWORD(df, 0)&0x7e000000; in decFloatToBCD()
1215 *exp=GETEXPUN(df); in decFloatToBCD()
1218 return DFISSIGNED(df); in decFloatToBCD()
1233 char * decFloatToEngString(const decFloat *df, char *string){ in decFloatToEngString() argument
1247 uInt sourhi=DFWORD(df, 0); /* word with sign */ in decFloatToEngString()
1249 uInt sourlo=DFWORD(df, 1); in decFloatToEngString()
1251 uInt sourmh=DFWORD(df, 1); in decFloatToEngString()
1252 uInt sourml=DFWORD(df, 2); in decFloatToEngString()
1253 uInt sourlo=DFWORD(df, 3); in decFloatToEngString()
1284 exp+=GETECON(df)-DECBIAS; /* .. + continuation and unbias */ in decFloatToEngString()
1361 if (!DFISZERO(df)) pre+=adj; in decFloatToEngString()
1468 Int decFloatToPacked(const decFloat *df, Int *exp, uByte *packed) { in decFloatToPacked() argument
1471 if (DFISINF(df)) { in decFloatToPacked()
1476 GETCOEFF(df, bcdar+1); /* use macro */ in decFloatToPacked()
1477 if (DFISNAN(df)) { in decFloatToPacked()
1479 *exp=DFWORD(df, 0)&0x7e000000; in decFloatToPacked()
1482 *exp=GETEXPUN(df); in decFloatToPacked()
1492 bcdar[DECPMAX+1]=(DFISSIGNED(df) ? DECPMINUS : DECPPLUS); in decFloatToPacked()
1512 char * decFloatToString(const decFloat *df, char *string){ in decFloatToString() argument
1526 uInt sourhi=DFWORD(df, 0); /* word with sign */ in decFloatToString()
1528 uInt sourlo=DFWORD(df, 1); in decFloatToString()
1530 uInt sourmh=DFWORD(df, 1); in decFloatToString()
1531 uInt sourml=DFWORD(df, 2); in decFloatToString()
1532 uInt sourlo=DFWORD(df, 3); in decFloatToString()
1543 exp+=GETECON(df)-DECBIAS; /* .. + continuation and unbias */ in decFloatToString()
1772 decFloat * decFloatZero(decFloat *df){ in decFloatZero() argument
1773 DFWORD(df, 0)=ZEROWORD; /* set appropriate top word */ in decFloatZero()
1775 DFWORD(df, 1)=0; in decFloatZero()
1777 DFWORD(df, 2)=0; in decFloatZero()
1778 DFWORD(df, 3)=0; in decFloatZero()
1782 return df; in decFloatZero()