Don't ccall fmpq_numerator_ptr

Nemocas · Oct 22, 2024 · 4533873 · 4533873
1 parent 569413b
commit 4533873
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/src/flint/fmpq.jl b/src/flint/fmpq.jl
@@ -671,25 +671,25 @@ remove(a::QQFieldElem, b::Integer) = remove(a, ZZRingElem(b))
 valuation(a::QQFieldElem, b::Integer) = valuation(a, ZZRingElem(b))
 
 function remove!(a::QQFieldElem, b::ZZRingElem)
-  nr = ccall((:fmpq_numerator_ptr, libflint), Ptr{ZZRingElem}, (Ref{QQFieldElem},), a)
+  nr = _num_ptr(a)
   vn, nr = remove!(nr, b)
   #QQFieldElem's are simplified: either num OR den will be non-trivial
-  if vn != 0
+  if !is_zero(vn)
     return vn, a
   end
-  nr = ccall((:fmpq_denominator_ptr, libflint), Ptr{ZZRingElem}, (Ref{QQFieldElem},), a)
+  nr = _den_ptr(a)
   vn, nr = remove!(nr, b)
   return -vn, a
 end
 
 function valuation!(a::QQFieldElem, b::ZZRingElem)
-  nr = ccall((:fmpq_numerator_ptr, libflint), Ptr{ZZRingElem}, (Ref{QQFieldElem},), a)
+  nr = _num_ptr(a)
   vn, nr = remove!(nr, b)
   #QQFieldElem's are simplified: either num OR den will be non-trivial
-  if vn != 0
+  if !is_zero(vn)
     return vn
   end
-  nr = ccall((:fmpq_denominator_ptr, libflint), Ptr{ZZRingElem}, (Ref{QQFieldElem},), a)
+  nr = _den_ptr(a)
   vn, nr = remove!(nr, b)
   return -vn
 end