sfos/ledger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Removed dependency on libgmpxx.a

Browse source
This commit is contained in:
John Wiegley 2004-08-23 08:25:40 -04:00
parent acfb58adac
commit ea3bf5d720
1 changed files with 7 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

24
amount.cc
View file

@ -73,17 +73,10 @@ static void mpz_round(mpz_t out, mpz_t value, int value_prec, int round_prec)
mpz_init(quotient); mpz_init(quotient);
mpz_init(remainder); mpz_init(remainder);
DEBUG_CLASS("ledger.amount.round");
DEBUG_PRINT_("mpz_round: value " << value);
mpz_ui_pow_ui(divisor, 10, value_prec - round_prec); mpz_ui_pow_ui(divisor, 10, value_prec - round_prec);
DEBUG_PRINT_("mpz_round: divisor " << divisor);
mpz_tdiv_qr(quotient, remainder, value, divisor); mpz_tdiv_qr(quotient, remainder, value, divisor);
DEBUG_PRINT_("mpz_round: quotient " << quotient);
DEBUG_PRINT_("mpz_round: remainder " << remainder);
mpz_divexact_ui(divisor, divisor, 10); mpz_divexact_ui(divisor, divisor, 10);
mpz_mul_ui(divisor, divisor, 5); mpz_mul_ui(divisor, divisor, 5);
DEBUG_PRINT_("mpz_round: divisor " << divisor);
if (mpz_sgn(remainder) < 0) { if (mpz_sgn(remainder) < 0) {
mpz_neg(divisor, divisor); mpz_neg(divisor, divisor);
@ -91,20 +84,16 @@ static void mpz_round(mpz_t out, mpz_t value, int value_prec, int round_prec)
mpz_ui_pow_ui(divisor, 10, value_prec - round_prec); mpz_ui_pow_ui(divisor, 10, value_prec - round_prec);
mpz_add(remainder, divisor, remainder); mpz_add(remainder, divisor, remainder);
mpz_ui_sub(remainder, 0, remainder); mpz_ui_sub(remainder, 0, remainder);
DEBUG_PRINT_("mpz_round: + remainder " << remainder);
mpz_add(out, value, remainder); mpz_add(out, value, remainder);
} else { } else {
DEBUG_PRINT_("mpz_round: - remainder " << remainder);
mpz_sub(out, value, remainder); mpz_sub(out, value, remainder);
} }
} else { } else {
if (mpz_cmp(remainder, divisor) >= 0) { if (mpz_cmp(remainder, divisor) >= 0) {
mpz_ui_pow_ui(divisor, 10, value_prec - round_prec); mpz_ui_pow_ui(divisor, 10, value_prec - round_prec);
mpz_sub(remainder, divisor, remainder); mpz_sub(remainder, divisor, remainder);
DEBUG_PRINT_("mpz_round: + remainder " << remainder);
mpz_add(out, value, remainder); mpz_add(out, value, remainder);
} else { } else {
DEBUG_PRINT_("mpz_round: - remainder " << remainder);
mpz_sub(out, value, remainder); mpz_sub(out, value, remainder);
} }
} }
@ -171,8 +160,6 @@ amount_t::amount_t(const double value)
void amount_t::_release() void amount_t::_release()
{ {
DEBUG_PRINT("ledger.amount.bigint-show",
"bigint " << quantity << " --ref " << (quantity->ref - 1));
if (--quantity->ref == 0) if (--quantity->ref == 0)
delete quantity; delete quantity;
} }
@ -205,8 +192,6 @@ void amount_t::_copy(const amount_t& amt)
quantity = amt.quantity; quantity = amt.quantity;
quantity->ref++; quantity->ref++;
DEBUG_PRINT("ledger.amount.bigint-show",
"bigint " << quantity << " ++ref " << quantity->ref);
} }
commodity = amt.commodity; commodity = amt.commodity;
} }
@ -663,7 +648,9 @@ std::ostream& operator<<(std::ostream& out, const amount_t& amt)
out << '0'; out << '0';
} }
else if (! (amt.commodity->flags & COMMODITY_STYLE_THOUSANDS)) { else if (! (amt.commodity->flags & COMMODITY_STYLE_THOUSANDS)) {
out << quotient; char * p = mpz_get_str(NULL, 10, quotient);
out << p;
std::free(p);
} }
else { else {
std::list<std::string> strs; std::list<std::string> strs;
@ -704,7 +691,10 @@ std::ostream& operator<<(std::ostream& out, const amount_t& amt)
out.width(amt.commodity->precision); out.width(amt.commodity->precision);
out.fill('0'); out.fill('0');
out << rquotient;
char * p = mpz_get_str(NULL, 10, rquotient);
out << p;
std::free(p);
} }
if (amt.commodity->flags & COMMODITY_STYLE_SUFFIXED) { if (amt.commodity->flags & COMMODITY_STYLE_SUFFIXED) {