@@ -178,9 +178,9 @@ for (op, T) in ((:fac_ui, Culong), (:set_ui, Culong), (:set_si, Clong), (:set_d,
178
178
end
179
179
end
180
180
181
- popcount (a:: BigInt ) = ccall ((:__gmpz_popcount , :libgmp ), Culong, (mpz_t,), & a) % Int
181
+ popcount (a:: BigInt ) = Int ( ccall ((:__gmpz_popcount , :libgmp ), Culong, (mpz_t,), & a))
182
182
183
- mpn_popcount (d:: Ptr{Limb} , s:: Integer ) = ccall ((:__gmpn_popcount , :libgmp ), Culong, (Ptr{Limb}, Csize_t), d, s) % Int
183
+ mpn_popcount (d:: Ptr{Limb} , s:: Integer ) = Int ( ccall ((:__gmpn_popcount , :libgmp ), Culong, (Ptr{Limb}, Csize_t), d, s))
184
184
mpn_popcount (a:: BigInt ) = mpn_popcount (a. d, abs (a. size))
185
185
186
186
function tdiv_qr! (x:: BigInt , y:: BigInt , a:: BigInt , b:: BigInt )
@@ -201,16 +201,16 @@ function gcdext!(x::BigInt, y::BigInt, z::BigInt, a::BigInt, b::BigInt)
201
201
end
202
202
gcdext (a:: BigInt , b:: BigInt ) = gcdext! (BigInt (), BigInt (), BigInt (), a, b)
203
203
204
- cmp (a:: BigInt , b:: BigInt ) = ccall ((:__gmpz_cmp , :libgmp ), Cint, (mpz_t, mpz_t), & a, & b) % Int
205
- cmp_si (a:: BigInt , b) = ccall ((:__gmpz_cmp_si , :libgmp ), Cint, (mpz_t, Clong), & a, b) % Int
206
- cmp_ui (a:: BigInt , b) = ccall ((:__gmpz_cmp_ui , :libgmp ), Cint, (mpz_t, Culong), & a, b) % Int
207
- cmp_d (a:: BigInt , b) = ccall ((:__gmpz_cmp_d , :libgmp ), Cint, (mpz_t, Cdouble), & a, b) % Int
204
+ cmp (a:: BigInt , b:: BigInt ) = Int ( ccall ((:__gmpz_cmp , :libgmp ), Cint, (mpz_t, mpz_t), & a, & b))
205
+ cmp_si (a:: BigInt , b) = Int ( ccall ((:__gmpz_cmp_si , :libgmp ), Cint, (mpz_t, Clong), & a, b))
206
+ cmp_ui (a:: BigInt , b) = Int ( ccall ((:__gmpz_cmp_ui , :libgmp ), Cint, (mpz_t, Culong), & a, b))
207
+ cmp_d (a:: BigInt , b) = Int ( ccall ((:__gmpz_cmp_d , :libgmp ), Cint, (mpz_t, Cdouble), & a, b))
208
208
209
209
mpn_cmp (a:: Ptr{Limb} , b:: Ptr{Limb} , c) = ccall ((:__gmpn_cmp , :libgmp ), Cint, (Ptr{Limb}, Ptr{Limb}, Clong), a, b, c)
210
210
mpn_cmp (a:: BigInt , b:: BigInt , c) = mpn_cmp (a. d, b. d, c)
211
211
212
212
get_str! (x, a, b:: BigInt ) = (ccall ((:__gmpz_get_str ,:libgmp ), Ptr{Cchar}, (Ptr{Cchar}, Cint, mpz_t), x, a, & b); x)
213
- set_str! (x:: BigInt , a, b) = ccall ((:__gmpz_set_str , :libgmp ), Cint, (mpz_t, Ptr{UInt8}, Cint), & x, a, b) % Int
213
+ set_str! (x:: BigInt , a, b) = Int ( ccall ((:__gmpz_set_str , :libgmp ), Cint, (mpz_t, Ptr{UInt8}, Cint), & x, a, b))
214
214
get_d (a:: BigInt ) = ccall ((:__gmpz_get_d , :libgmp ), Cdouble, (mpz_t,), & a)
215
215
216
216
limbs_write! (x:: BigInt , a) = ccall ((:__gmpz_limbs_write , :libgmp ), Ptr{Limb}, (mpz_t, Clong), & x, a)
0 commit comments