Adjust for FLINT 3.1 fq_nmod changes

src/flint/FlintTypes.jl

@@ -2210,7 +2210,6 @@ A finite field. Implemented as $\mathbb F_p[t]/f$ for the prime $p$ being an [`I
 See [`FqPolyRepField`](@ref) for $p$ being a [`ZZRingElem`](@ref). See [`fqPolyRepFieldElem`](@ref) for elements.
 """
 @attributes mutable struct fqPolyRepField <: FinField
-   p :: Int
    n :: Int
    ninv :: Int
    norm :: Int
@@ -2237,19 +2236,23 @@ See [`FqPolyRepField`](@ref) for $p$ being a [`ZZRingElem`](@ref). See [`fqPolyR
    overfields :: Dict{Int, Vector{FinFieldMorphism}}
    subfields :: Dict{Int, Vector{FinFieldMorphism}}
 
-   function fqPolyRepField(c::ZZRingElem, deg::Int, s::Symbol, cached::Bool = true; check::Bool = true)
+   function fqPolyRepField(c::UInt, deg::Int, s::Symbol, cached::Bool = true; check::Bool = true)
       check && !is_prime(c) &&
          throw(DomainError(c, "the characteristic must be a prime"))
       return get_cached!(FqNmodFiniteFieldID, (c, deg, s), cached) do
          d = new()
-         ccall((:fq_nmod_ctx_init, libflint), Nothing,
-               (Ref{fqPolyRepField}, Ref{ZZRingElem}, Int, Ptr{UInt8}),
-			    d, c, deg, string(s))
+         ccall((:fq_nmod_ctx_init_ui, libflint), Nothing,
+               (Ref{fqPolyRepField}, UInt, Int, Ptr{UInt8}),
+               d, c, deg, string(s))
          finalizer(_FqNmodFiniteField_clear_fn, d)
          return d
       end
    end
 
+   function fqPolyRepField(c::T, deg::Int, s::Symbol, cached::Bool = true; check::Bool = true) where T <: Union{Int, ZZRingElem}
+       return fqPolyRepField(UInt(c), deg, s, cached, check = check)
+   end
+
    function fqPolyRepField(f::zzModPolyRingElem, s::Symbol, cached::Bool = true; check::Bool = true)
       check && !is_prime(modulus(f)) &&
          throw(DomainError(base_ring(f), "the base ring of the polynomial must be a field"))
@@ -2277,7 +2280,7 @@ See [`FqPolyRepField`](@ref) for $p$ being a [`ZZRingElem`](@ref). See [`fqPolyR
 
 end
 
-const FqNmodFiniteFieldID = CacheDictType{Tuple{ZZRingElem, Int, Symbol}, fqPolyRepField}()
+const FqNmodFiniteFieldID = CacheDictType{Tuple{UInt, Int, Symbol}, fqPolyRepField}()
 
 const FqNmodFiniteFieldIDNmodPol = CacheDictType{Tuple{zzModPolyRing, zzModPolyRingElem, Symbol},
                                     fqPolyRepField}()

src/flint/fq_nmod.jl

@@ -102,10 +102,7 @@ is_unit(a::fqPolyRepFieldElem) = ccall((:fq_nmod_is_invertible, libflint), Bool,
                      (Ref{fqPolyRepFieldElem}, Ref{fqPolyRepField}), a, a.parent)
 
 function characteristic(a::fqPolyRepField)
-   d = ZZRingElem()
-   ccall((:__fq_nmod_ctx_prime, libflint), Nothing,
-         (Ref{ZZRingElem}, Ref{fqPolyRepField}), d, a)
-   return d
+   return ccall((:fq_nmod_ctx_prime, libflint), UInt, (Ref{fqPolyRepField},), a)
 end
 
 function order(a::fqPolyRepField)
@@ -116,8 +113,7 @@ function order(a::fqPolyRepField)
 end
 
 function degree(a::fqPolyRepField)
-   return ccall((:fq_nmod_ctx_degree, libflint), Int,
-                (Ref{fqPolyRepField},), a)
+   return ccall((:fq_nmod_ctx_degree, libflint), Int, (Ref{fqPolyRepField},), a)
 end
 
 function deepcopy_internal(d::fqPolyRepFieldElem, dict::IdDict)