Add missing methods

Nemocas · Oct 21, 2024 · 440cdb4 · 440cdb4
1 parent 2917bfb
commit 440cdb4
Show file tree

Hide file tree

Showing 4 changed files with 32 additions and 0 deletions.
diff --git a/src/arb/Complex.jl b/src/arb/Complex.jl
@@ -1661,6 +1661,14 @@ for (typeofx, passtoc) in ((ComplexFieldElem, Ref{ComplexFieldElem}), (Ptr{Compl
       ccall((:acb_set, libflint), Nothing, (($passtoc), Ref{ComplexFieldElem}), x, y)
     end
 
+    function _acb_set(x::($typeofx), y::Ptr{acb_struct})
+      ccall((:acb_set, libflint), Nothing, (($passtoc), Ptr{acb_struct}), x, y)
+    end
+
+    function _acb_set(x::Ptr{acb_struct}, y::($typeofx))
+      ccall((:acb_set, libflint), Nothing, (Ptr{acb_struct}, ($passtoc)) , x, y)
+    end
+
     function _acb_set(x::($typeofx), y::ComplexFieldElem, p::Int)
       ccall((:acb_set_round, libflint), Nothing,
             (($passtoc), Ref{ComplexFieldElem}, Int), x, y, p)

diff --git a/src/arb/Real.jl b/src/arb/Real.jl
@@ -1992,6 +1992,14 @@ for (typeofx, passtoc) in ((RealFieldElem, Ref{RealFieldElem}), (Ptr{RealFieldEl
       ccall((:arb_set, libflint), Nothing, (($passtoc), Ref{RealFieldElem}), x, y)
     end
 
+    function _arb_set(x::($typeofx), y::Ptr{arb_struct})
+      ccall((:arb_set, libflint), Nothing, (($passtoc), Ptr{arb_struct}), x, y)
+    end
+
+    function _arb_set(x::Ptr{arb_struct}, y::($typeofx))
+      ccall((:arb_set, libflint), Nothing, (Ptr{arb_struct}, ($passtoc)) , x, y)
+    end
+
     function _arb_set(x::($typeofx), y::RealFieldElem, p::Int)
       ccall((:arb_set_round, libflint), Nothing,
             (($passtoc), Ref{RealFieldElem}, Int), x, y, p)

diff --git a/src/arb/acb.jl b/src/arb/acb.jl
@@ -1656,6 +1656,14 @@ for (typeofx, passtoc) in ((AcbFieldElem, Ref{AcbFieldElem}), (Ptr{AcbFieldElem}
       ccall((:acb_set, libflint), Nothing, (($passtoc), Ref{AcbFieldElem}), x, y)
     end
 
+    function _acb_set(x::($typeofx), y::Ptr{acb_struct})
+      ccall((:acb_set, libflint), Nothing, (($passtoc), Ptr{acb_struct}), x, y)
+    end
+
+    function _acb_set(x::Ptr{acb_struct}, y::($typeofx))
+      ccall((:acb_set, libflint), Nothing, (Ptr{acb_struct}, ($passtoc)) , x, y)
+    end
+
     function _acb_set(x::($typeofx), y::AcbFieldElem, p::Int)
       ccall((:acb_set_round, libflint), Nothing,
             (($passtoc), Ref{AcbFieldElem}, Int), x, y, p)

diff --git a/src/arb/arb.jl b/src/arb/arb.jl
@@ -2000,6 +2000,14 @@ for (typeofx, passtoc) in ((ArbFieldElem, Ref{ArbFieldElem}), (Ptr{ArbFieldElem}
       ccall((:arb_set, libflint), Nothing, (($passtoc), Ref{ArbFieldElem}), x, y)
     end
 
+    function _arb_set(x::($typeofx), y::Ptr{arb_struct})
+      ccall((:arb_set, libflint), Nothing, (($passtoc), Ptr{arb_struct}), x, y)
+    end
+
+    function _arb_set(x::Ptr{arb_struct}, y::($typeofx))
+      ccall((:arb_set, libflint), Nothing, (Ptr{arb_struct}, ($passtoc)) , x, y)
+    end
+
     function _arb_set(x::($typeofx), y::ArbFieldElem, p::Int)
       ccall((:arb_set_round, libflint), Nothing,
             (($passtoc), Ref{ArbFieldElem}, Int), x, y, p)