jacobisymbol, legendresymbol: Int->Cint

HT @jlapeyre

Ref: julia-users
https://groups.google.com/d/topic/julia-users/R5_ks7eAjgg/discussion

Author: jiahao

src/Combinatorics.jl

@@ -83,7 +83,7 @@ hyperfactorial(n::Integer) = prod([i^i for i = BigInt(2):n])
 function jacobisymbol(a::Integer, b::Integer)
     ba = BigInt(a)
     bb = BigInt(b)
-    return ccall((:__gmpz_jacobi, :libgmp), Int,
+    return ccall((:__gmpz_jacobi, :libgmp), Cint,
         (Ptr{BigInt}, Ptr{BigInt}), &ba, &bb)
 end
 
@@ -100,7 +100,7 @@ end
 function legendresymbol(a::Integer, b::Integer)
     ba = BigInt(a)
     bb = BigInt(b)
-    return ccall((:__gmpz_legendre, :libgmp), Int,
+    return ccall((:__gmpz_legendre, :libgmp), Cint,
         (Ptr{BigInt}, Ptr{BigInt}), &ba, &bb)
 end
 

test/basic.jl

@@ -20,7 +20,7 @@
 @test lassalle(14) == BigInt("270316008395632253340")
 
 # legendresymbol
-@test legendresymbol(1001,9907) == jacobisymbol(1001,9907)
+@test legendresymbol(1001,9907) == jacobisymbol(1001,9907) == -1
 
 # lucas
 @test lucas(10) == 123