X-Git-Url: https://ginac.de/CLN/cln.git//cln.git?a=blobdiff_plain;f=src%2Fcomplex%2Fring%2Fcl_C_ring.cc;h=5a576ece813e2ac2e24be81b05d0c1b9ed4fb6f3;hb=e52830748240df6b0ab51d8a78243c88132f6c75;hp=49cfcc37d593834a793dc9075ac30a4a4b020e23;hpb=dd9e0f894eec7e2a8cf85078330ddc0a6639090b;p=cln.git diff --git a/src/complex/ring/cl_C_ring.cc b/src/complex/ring/cl_C_ring.cc index 49cfcc3..5a576ec 100644 --- a/src/complex/ring/cl_C_ring.cc +++ b/src/complex/ring/cl_C_ring.cc @@ -6,16 +6,18 @@ CL_PROVIDE(cl_C_ring) // Specification. -#include "cl_complex_ring.h" +#include "cln/complex_ring.h" // Implementation. -#include "cl_complex.h" -#include "cl_complex_io.h" +#include "cln/complex.h" +#include "cln/complex_io.h" #include "cl_C.h" -static void N_fprint (cl_heap_ring* R, cl_ostream stream, const _cl_ring_element& x) +namespace cln { + +static void N_fprint (cl_heap_ring* R, std::ostream& stream, const _cl_ring_element& x) { unused R; fprint(stream,The(cl_N)(x)); @@ -24,7 +26,7 @@ static void N_fprint (cl_heap_ring* R, cl_ostream stream, const _cl_ring_element static cl_boolean N_equal (cl_heap_ring* R, const _cl_ring_element& x, const _cl_ring_element& y) { unused R; - return cl_equal(The(cl_N)(x),The(cl_N)(y)); + return equal(The(cl_N)(x),The(cl_N)(y)); } static const _cl_ring_element N_zero (cl_heap_ring* R) @@ -111,7 +113,7 @@ static cl_ring_mulops N_mulops = { static cl_number_ring_ops N_ops = { cl_N_p, - cl_equal, + equal, exact_zerop, operator+, operator-, @@ -151,9 +153,12 @@ cl_class cl_class_complex_ring = { }; // Constructor. +template <> inline cl_complex_ring::cl_specialized_number_ring () : cl_number_ring (new cl_heap_complex_ring()) {} const cl_complex_ring cl_C_ring; +} // namespace cln + CL_PROVIDE_END(cl_C_ring)