/[guile]/guile/guile-core/libguile/numbers.c
ViewVC logotype

Diff of /guile/guile-core/libguile/numbers.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.183 by kryde, Mon May 5 22:55:46 2003 UTC revision 1.184 by kryde, Mon May 5 23:01:30 2003 UTC
# Line 1387  SCM_DEFINE (scm_logcount, "logcount", 1, Line 1387  SCM_DEFINE (scm_logcount, "logcount", 1,
1387          {          {
1388            mpz_t z_n;            mpz_t z_n;
1389            mpz_init (z_n);            mpz_init (z_n);
1390            mpz_neg (z_n, SCM_I_BIG_MPZ (n));            mpz_com (z_n, SCM_I_BIG_MPZ (n));
1391            scm_remember_upto_here_1 (n);            scm_remember_upto_here_1 (n);
1392            count = mpz_popcount (z_n);            count = mpz_popcount (z_n);
1393            mpz_clear (z_n);            mpz_clear (z_n);

Legend:
Removed from v.1.183  
changed lines
  Added in v.1.184

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26