author | Camm Maguire <camm@debian.org> | 2015年02月05日 10:40:13 -0500 |
---|---|---|
committer | Camm Maguire <camm@debian.org> | 2015年02月05日 10:40:13 -0500 |
commit | ef2e6e30b951d44cc9b5d6c32962a5458195a0cf (patch) | |
tree | 1100e63df2ab80e294517548df617e938de24549 | |
parent | 0c4b768afdacf5147222883f9c5858e85288a544 (diff) | |
download | gcl-ef2e6e30b951d44cc9b5d6c32962a5458195a0cf.tar.gz |
-rw-r--r-- | gcl/o/gmp_num_log.c | 4 |
diff --git a/gcl/o/gmp_num_log.c b/gcl/o/gmp_num_log.c index f611c712b..c794d0354 100644 --- a/gcl/o/gmp_num_log.c +++ b/gcl/o/gmp_num_log.c @@ -88,7 +88,7 @@ big_bitp(object x, ufixnum p) return mpz_tstbit(MP(x),p); } -static int +static fixnum mpz_bitcount(__mpz_struct *x) { if (mpz_sgn(x) >= 0) { @@ -101,7 +101,7 @@ mpz_bitcount(__mpz_struct *x) } -static int +static fixnum mpz_bitlength(__mpz_struct *x) { if (mpz_sgn(x) >= 0) { |